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COMMAND LINE !«AS: SNAP3 PROC* » ,PROCf SSPLX 



INCLU 
INCLU 
INCLU 
INCLU 
INCLU 
INCLU 
I^ICLU 
INCLU 
INCLU 
TNCLU 



STOW 

SION 

siaw 

SION 
SION 
SION 
SIQN 
SION 
SfON 
SION 



AS 

81 
CS 
0« 

ej 
G: 

HI 

l: 

Ji 



PRQCPAR 
PMACMIC 
GMACROZ 
PORTASG 

pRoceau 

HPSF180 
8OEF180 
PORTEOU 
OOEFlSi! 
HOEF180 



M/TXT 
/TXT 

/r^i 

N/TXT 
S/TXT 
0/TXT 
0/TXT 
S/TXT 
0/TXT 
««/TXT 



PROGRAM NAME! PROC 



PROGRAM ADDRESS BLOCKS: 



PRIMARY TRANSFER ADDRESS: 
EXTERNAL definitions: 



POR 


i?»git^a«0 


/PROCL/ 


EXADR 


pimitnA 


/PROCL/ 


MIN 


00(32?!0 


/PROCL/ 


SCROML 


000310 


/PROCL/ 


UDOP 


i8i321 


/PROCL/ 


ALPHA 


000417 


/PROCL/ 


PINO 


00121S 


/PROCL/ 


RINST 


0iUl6 


/PPOCL/ 


SFAC 


001226 


/PROCL/ 


SRE 


001366 


/PROCL/ 


INCPA 


001463 


/PROCL/ 


OECX 


001541 


/PROcL/ 


DL 


001655 


/PROCL/ 



010000 

167400 
170000 

000000 
000000 

000000 



INPUT 

EXSTAT 

MDUT 

SCROM 

SCLST 

SYSRETl 

SYSTAT 

ftCP 

RFS 

CCS 

INCP 

INCX 

RRL 



/ABSOLUTE/ SIZE«00e000 CABS) 



/SYSIVR/ 
/SYSROM/ 

/PROCL/ 
/PROCP/ 

/PROCL/ 



SIZE«000400 (ASS) 

SIZE»000047 tASS) 

8IZE«002000 (RED 

SnE«00400« (RED 



000061 
000123 
000230 
000311 
000325 
000512 
000757 
001126 

001300 

001402 
001470 
001543 
001731 



EXTERNAL REFERENCES (UNDEFINED SYMBQLS3 I 



RETS 



FfTCHiN 



SRVRPT 



PSH8T0 



PCMOD 



UNUSED labels: 

RINSIO SCLSTI SCOECP MEMPF8C 



/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 



HEMPFS 



IVIOLS 

EXDATA 

BP 

SCOON 

SCRAM 

REGS 

BT 

RINIS 

SLC 

PLR 

DECPA 

DS 

EI 



SRVOO 



000317 
000134 
000302 
000335 
000333 
000557 

001000 

001207 
001346 
001407 
001512 
001647 
001745 



POPST0 



/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 



PIN 
OUTPUT 

sc 

UDPOP 

BETA 

STL 

RIN256 

BESB 

SRC 

PSR 

DECP 

DLHL 

ni 



SYSRET0 FETCHI 



000074 
000145 
000304 
000314 
000400 
000652 
001U0 
001222 
0013S5 
001440 
001517 
001651 
081756 



FETCH 



/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 
/PROCL/ 



EIROJ 
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I' 

\' 
I'. 

14. 

15" 

16 

17 

18 

19^ 

?3l 

24; 

26 a 

27, 



2ji9 MJ3 
2.9pK HJ$ 
Zf9fi HJS 

2^9 » I HJS 
Z ji 9 f H HJS 
2.9,6 HJS 
a,9^F HJS 
2p9^E HJS 
2,9.0 HJS 
2^9pC HJS 

8,9, A HJS 

2n8#B HJS 
2 , 8 • A HJS 

2.7. HJS 



2,5,C HJS 
2^5,8 HJS 
2, 5. A HJS 

2.4U HJS 

2',4,A HJS 



78 JUl 
78 APR 
78 MAR 
78 FEB 
78 FEB 
78 FEB 
78 JAN 
78 JAN 
77 DEC 
77 DEC 
77 NOV 
77 NOV 

77 SEP 

77 SEP 

77 SEP 



20 
23 

27 

16 
3 
U 
4 
21 
13 
2(? 
14 

19 



2,H,8 HJS 77 AUG 31 



77 AUG 18 

77 JULY 13 

77 JULY 12 

77 JULY 12 

77 JULY 7 



FINAL RELEAS 
SPLIT PROCi 
RESTRUCTURE 
CORRECT 9,H 
EVERY800Y ME 
CORRECT TJMI 
FIXING MlN/M 
TESTING REPE 
CORRECT STL 
BACK OFF FRO 
INCLUDE TIHI 
CHANGE KFYBO 



E OF VERSION 9 

MAKE RELOCATABLE. CHANGE APF, AOD AML 

INTERRUPT SEQUENCE & MINOR MOOS 

FOR FAULT CLEANUP 

MPFiSi KEYBOARD SCAN, S SIR CHANGE 

NG, COMMENTS, % AOD POP TIMEOuT 

OUT TIMINGS 

ATED KEYIN CONTROLS 

INSTRUCTION 

M KBO RPT % RE-DO STL FOR TIMING 

NGS AS CALCULATED * FIX MINOR BUGS 

ARD CODE TO AID REPEATED KEY CONTROL 



MTI CHANGE SO LENGTH IS 2 
MTI CHANGE TO ALLOW MFRPT 



BYTE NUMBER 

ON ANY INTERRUPT 



MJMOR BUG-FIX AND OPTIMIZATION FOR RELEASE 

MTI 8PECTAL VERSION 

UPDATE COMMENTS ON THE CODE 
CORRECTED NAMES FOR COM REGISTERS 
UP TO NEXT NEW VERSION NUMBER 

FIXED ILLEGAL MAR CHANGE IN REGL RETURN TQ FETCH 
FIXED FILE TO CONFORM TO VRP FORMAT fA LITTLE) 
INITIAL PRE-RELEASE OF THE MICRO-CODE 
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30. 

31y 
32^ 

33^ 
34. 
35j 
36. 
37'. 
38l 
39y 
40, 

41 
A2f 
43, 
44, 

46, 
47, 

4$: 

49', 
5lJ 

»3 ft. ji 

53, 
54. 
55l 
56, 

581 
59J 

60, 

63j 
64, 
651 
66. 






USEFUL INFORHATION TO BE PASSED ONi 

************************************************************ 
IF SECTOR CONTAINING SEK8SI IS WRITE PROTECTEO THEN CAN NOT 

DLSOQ CODEr ACC«DO & SYSRET FORCEl PRIVED MODE TD BE SURE C 
MEMORV THAT PROTECTED* FKIO, COMM MUST 00 THIS ALSOU 

ALL SMR'S AND MOW'S MUST HAVE FOLLOWING MWAIT ,MEMpFX 

IN THE CODE EVEN IF MHAIT ,S+l IS USED (IGNORING MEMORY FA 

A********************************************************** 

FOR TESTING MEMPF, CHANGE MWAIT MACRO TO BE JT,MP $+1 «< 
CODE THERE, TESTABLE AS USED BUT NO EFFECTll 

EACH SERVICE ROUTINE THAT USES THE MAR MUST HAVE A HWAIT ,S 
MAR CHANGED, IF NOT USED, RETURN THROUGH SRVNXTJ 

ALL INPUTS FROM A PORT INSTRUCTION SHOULD BE LOGICAL (OUTPU 
LOGICAL OR 'IT'5, 

ARITHMETICS MAY BE DONE ON INPUTS WITH CAUTION, ONLY IF THE 
TIME, . , MDR IS OK, BUT IMPI OR URI ARE NO«NO»S. 

A********************************************************** 

DELAY AROUND SECTOR TABLE WRITES IS NOT NECESSARY, 

DELAY DURING FONT LOAD IS ONLY AFTER LOCH, A 400 SEC, DEL 
FROM AFTER LDCH TO ANY OF ROLM, SOLM, SKCH, MARQL, OR LDM 
ALSO, RDLM AND SOLM SHOULD NQT BE TOO CLOSE TOGETHER, 



00 A RESTARTJ UU 
****************** 
AN WRITE/ACCESS 

EVERYWHERE 
ULT) 

*♦*♦*♦♦♦*♦***♦♦♦♦♦ 



****************** 
♦1 BEFORE THE 

****************** 
T CAN ONLY BE 

DATA HAS NO SETUP 

****************** 

****************** 
AY IS NECESSARY 
AP. 

****************** 





INC 


PRDCPARM 


PROCL 


ORG 


PROC 


PPOCP 


ORG 





PROCL 


USE 


PROCL 




USE 


PRQCP 


PROCP 


LOC 


PROCL, S 



LOGICAL SPACE IN ROM'S 
PHYSICAL SPACE DONE AT LINK 
ENABLE BOTH ADDRESS SPACES 
BUILD CODE IN PHYSICAL SPACE 
LOC'ING TO LOGICAL ADDRESSES 



TIME 



DATAPOINT CONFIDENTIAL INFORHATTQN • SEE PAGE I 
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691 

72l 

7K 
74. 

76. 
771 

78; 

79. 



80. 
81; 

83. 
84, 

80. 
87^ 

88. 
89l 

ml 

92. 

93. 

9»J 

gel 
97. 



98. 
99l 

I00I 

l(?'ll 
1«2. 
I03l 
1514. 

106. 

197* 

it0. 

ml 
112I 

11 3l 



%pim0ai 



^^$m^i 0iiti«eif mniii 

mm§ii ti$m\pi^ inuiis5 

0ei0i02L eiPiiteim oiiaaauf 

0i00i3L 010l5tBP!l ««^0a0{30 



0i0^i4L 

0a0005U 
09091 PI6L 

00e5«i7L 



P(0U011I 



10i011S)0 

K!?00il0i 

(?i00g0?iu 

1U101511 

iHi0i0a 



»»PlllL 0«00BU1 UlHlil 



0(?»001SL 
000013L 



00UPU1 
00U0U1 
0U0U11 



00l«010l 

001B0100 
lUtl00l 



000015L 0000011! UUi'aPil 
000016L 00110111 01000100 



000017L 
00002i!»L 
000021L 
000022L 
000023L 
000024L 
000025U 
000026L 
000027L 



0000301. 

000031L 
000032L 
000033L 
000034L 

0000351 
000i36L 

000037t 

00i040L 

000041L 



01010001 

00000U1 
8^1010001 
00000111 
01010001 
00115^111 
00110001 
01000101 
11000010 



01010001 
00110111 

00110111 
01010010 
11000000 

01010001 

00110111 

01010001 

00U0111 
01010W01 



1 1 1 1 1 1 1 1 
11110011 
10011100 
10U0000 
00100100 
10001001 
00110111 
00000010 
11010010 



00001100 
11100000 
00000101 
00010000 
11100110 

11110000 
00000101 

11101111 

11100000 

00000000 



MTCRO-PPOCESSOR EMULATION SUPPORT CODE - HJS • 
, POWER ON RESTART, INITIALIZE THE WORLO 

PORI 

I INITIALIZE ALL CONTROL TABLES THAT CAN NOT BE INIT'D BY POR HACRO CODE 

t 



BPGX 
STB 
MWAIT 
STB 



RDL^ 

#IGNORE 

CMPF 



LOPI PSWO,0 



LOPT 

LOPT 

LDRT 

LDRT 

IPC 

XIF 

IF8 

LORT 

XIF 

LOPT 

LOPT 

LDRT 

LDPT 

LDRT 

LOPT 



HOOW 

8ASW 

MRSTAT 

HfilTS 

APF 

APF 
ACCTL 

SOLCMD 

ACUOT 

COMMODE 

LIMP 

KRSCNT 

KRSC 



LORI MA0R,»1 

LORI P0LNP,SE0LB0T,CC 

LOPI PC0L,SRTM0UT 

T8TIP ,STLIM0UT,8TEK 

BRA POROUT,FZ 



DO NOT CLEAR UP THE DISPLAY 

TIMEOUT SAFETY (IGNORE MEMORY FAULT) 

(INSTEAD OF FAULT JUMP) 

** T-REG IS ZERO FOR THE FOLLOWING #* 

SET EMULATION PSW 

PORT CONTROLS APPROPRIATLY 
BASE REGISTER IS INITIALLY ZERO 
MICROfBUS STATE INITIALLY OFFi 
MICRO-BUS INITIALLY CLEARED FOR ACTION 



NO AUDIO CHANNEL INITIALLY 

COMM OUTPUT IS OFF 

AUTO CALL UNIT IS ALSO OFF 

FLUSH THE COHMODEJ ("MURF") 

IMPLICIT REG IS ZERO AT THE START 

SAVE THE SCAN NUMBER AND 

START THE FIRST KEY SCAN 

NO DEVICE ACCESSED YET ON MICRO-BUS 

POINT TO THE BOTTOM LINE 

ASSUME THAT A TIMEOUT WILL HAPPEN 

CHECK IF IT DID 

YES, DON'T INIT STL OR MEMORY 



, MUST INIT SECTOR TABLE & ZERO SYSESR OR IMMEDIATE RESTART OR MEMpF 



, LDPI MOOW,SWBAS0 

LOTI STAEtSTWE 

PORLST LDPT MAROH,STW 

OOTI ,ACil6 

BRA PORLST, FC 



DISABLE BASING FOR SECTOR TABLE LOAD 
♦* INIT WHOLE SECTOR TABLE ** 



LOOP TILL ALL ARE ACCESS «. WRITE ENABLED 



LDPI STW,SYSRQM>8, AND, 0360 SECTOR 017 IS SYSTEM ROM, PROTECT IT 



OLDPI SPO.SESTACK 
LDPI MAR0H,SYSESR>8 

LDPI MAROL. SYSESR 



STACK TO EMULATION RAM (CAN ELIMINATE) 
POINT TO THE EMULATION SUPPORT PAGE 

START OF IT (T-REG IS ZERO) 



OATAPOINT CONFIDENTIAL INFORMATION - SEC PAGE I 



PAGE 



PPOC/TXT 



1141 

115, 
116. 

ii7; 

list 

us; 

180, 
181. 
1221 
123^ 
124. 
12S'. 



I26r 
127, 

128. 

129. 

130'. 



isr. 



000?l43t 
0i0i44t 

0?l0P!45t 
000«58l, 



00110111 
0U011U 
00110U1 

00U0U1 
00110U1 
0111000! 
01101110 
01010001 
11000100 
11000000 



} 1000000 
U110010 
00001101 

00001100 
00100001 
11U0010 
01110010 
00000000 
11010101 

11011010 



000054t 00110111 10001001 

00005BL 01010001 11110000 
0000561 00110111 10001000 



>000057l. 01011001 IIUIUI 
>000060L 11001111 UUllll 



MICR0i«PR0CE830R EMULATION SUPPORT CODE «• HJS 
, POWER ON RESTART, INITIALIZE THE WORLO 
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PORIRO 



FETPC 
POROUT 



, NOTEl 



LORT TEMPL 

STB OMAR 

STB IMAR,MOW 

INCR TEMPLiTEMPi, 

LOTI 

MWAIT , IGNORE 

BRA PORZRQpFC 

LOPT PCQL 

LOPI PC0H,SYSR0M>8 



INITIALIZE THE COUNTER 

CORRECT MAR SO ALL OF PAGE INITED 

ZERO THE NEXT BYTE tTf»REG IS ZERO) 

COUNT ALL OF THE BYTES IN THE PAGE 

DATA TO BE i»iRITTEN IS ZERO 

li IGNORE ANY AND ALL FAULTS il 

CONTINUE TILL ALL PAGE DONE 

LOAD THE PC LSB ADDRESS 



NORMALLY HERE, PCL IS ZERO AND PCH ■ SYSR0M>8 

THIS GENERATES A POINTER TO SRPOWER^-UP VECTOR ENTRY 



BRAX 



RETS 



OK, MICRO^POR DONE, 00 MACRO P0« 
(OR TIMEOUT) COR SC ERROR) 



DATAPOINT CONFIDENTIAL INFORMATION • SEF PAGE I 



PAGE 
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134, 
I35y 
136. 
137, 
138: 
138, 
140, 

Ml» 
142, 

143^ 
M4, 

i4s: 

146, 
I47l 
148, 

149, 

150, 
151. 

lS2l 

153. 



154; 

155; 
156. 

157; 

158, 
1591 

16!?, 
I6ll 
1621 
163, 
164, 
165, 
1661 
1671 
168, 
1691 
1701 
171, 
172, 
1731 
174. 



175; 

176. 


177; 

178. 



0PI09)61L 



0PiWei6JL 
f00i6aL 
000»63L 
000064L 
000065L 
000066L 
0008«67L 
00007BL 
000071L 
>0i0072L 
>000073L 



000074L 



000074L 
000075L 
000076L 
000077L 
000100L 
000101L 
000102L 



00110001 
01000101 
11000010 
00110001 
00110111 
001 1011 1 
00110001 
01000101 
11000011 
01011001 
11001111 



00110001 
01000101 
11000010 
0ill0001 
01000101 
11000011 
01010001 



110U100 

00000100 
00110000 
00010100 
00101011 
10001111 
00110001 
00000010 
11001000 

1 1 1 1 1 1 u 
11 1 U 1 1 1 



11011100 
00000100 
00110000 
00110001 
00000100 
11001011 
1^0000110 



INPUT FROM 9500 BUS 
INPUT TO OTHER THAN A»PEG 



NPUTI 
6",80 ( 1015 IN 
7,80 (IMP 1013 INR 
*♦♦♦♦♦ 
NOTES INSTRUCTION FETCH TIME (APPROX, 2 MICRO^SEC,) INCLUDED IN COUNT FOR 

TOTAL OF S MICRO"»SEC. I/O TlMlNg OF THE INSTRUCTION, 
****** 

IF USER THEN IVIOL 
ELSE 
INPUTXI 

IMP <m IN8US 

SINS 

DELAY 

FETCHW 



fACKNOWLEDGE THE DEVICE) 

(WAIT FOR BUSS TIMING TO COMPLETE) 



INPUTX 



INPWl 



FTCHIO 

* 
PINI 

6'.25 

8.29 

****** 

NOTES 
****** 



TSTIP ,SWUSER,P8WI 

BRA IVIOLSjFZ 

LDPP SIN8,INBU8,IMP0 



TSTIP ,ST!0DR, STATUS 



CONTINUE ONLY IF IN PRIVEO MODE 
GET INPUT DATA ANO FAST ACKNOWLEDGE 



BRA 
BRAX 



INPWlpTZ 
FETCHW 



C 1035 
tIMP 1033 



PIN 
PINR 



WAIT FOR ACK, TO MAKE ITSELF KNOWN 
»W' BECAUSE I/O DELAY TIMING NEEDS IT 

AS i^ELL AS EX AOR AND MIN MEMORY WRITES 



PARITY CHECKING INPUT 
INTO OTHER THAN A-REG 



INSTRUCTION FETCH TIME (APPROX. 2 MICRO-SEC, INCLUDED IN COUNT FOR 
TOTAL OF S MICRO-SEC, I/O TIMING OF THE INSTRUCTION, 



IF USER THEN IVIOL 
ELSE 

IF NOT 8TPFIN IN STATUS THEN INPUTX 
ELSE T <» 8VINP 
8CL8T 



MINPAR 



TSTIP iSWUSERiPSWI 

BRA IVIOLS.FZ 

TSTIP .STPFIN, STATUS 

BRA INPUTX, TZ 

LDTI SVINP 



**♦ INITIAL DELAY 2 MICRO»SEC, IN FETCH 
DON'T CONTINUE UNLESS PRIVEO 



NO PARITY FAULT, CONTINUE RE«3ULAR INPUT 
USE PARITY INPUT ERROR VECTOR 



OATAPOINT COMFIOENTIAL INFORMATION • SEE PAGE I 

PASE 8 PROC/TXT MICRO-PROCESSOR EMULATION SUPPORT CODE • HJS m 78JUI,2I9 HS44 

, INPUT OUTPUT OPERATIONS 

179' i«0i^3i. uaeiiiii «0i«U0i bra sclstw and call supervisor error routine 

188. • PC correct or BACK UP IF IMP NONwZERO 



DATAPOINT CONFIOENTUU INFORMATION - SEE PAGE 1 



PAGE 
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1821 
183. 
184. 
185^ 
186. 
I87y 
1 88 « 
189, 
190p 
i9Vf 

193. 



1941 



1951 
196. 



1971 



1981 



199, 

2001 
2011 

202* 
203, 
204, 
2051 
206, 
2SJ7, 
208, 
209, 
210. 



2111 

212^ 

213. 



2141 



$mi«Ai 



000104L 

0ptai05u 

0001iil, 
0^01071 
ei0G!U?!L 
0001111. 
0001121. 
0001 13L 
0001l4t 
00011§L 

0001161 

0001171. 

0001201. 

0001211 
000122L 

000123L 



0001231 
00il24L 
000125L 
000126L 
000127L. 
000130L 
0001311 
0001321 
0001331 



00110001 
00110111 

00U0111 
00110001 
01000101 
11000010 
01010101 
00110111 
01010001 
00U0H1 
01010001 
00110111 
00110001 
00110111 
11001111 



00110001 
00U0U1 

00110111 

00110001 
01000101 
11000010 

01010101 
00110U! 
11001111 



11011111 

00100000 
00101100 

110U100 

00000100 
00110000 
1110U11 

10001100 
10101010 

11000000 
11101111 
11100000 

iiiiiui 

00100001 
10010100 



11011111 
00100000 
00101100 
11011100 
00000100 
00110000 
11101111 
10001100 
!0010100 



MICRO'-PROCESSCIR EMULATION SUPPORT CODE • HJS 
, INPUT OUTPUT OPERATIONS 

+ 
EXADRI 



78JUU20 UU4 



11,50 ( 1213 EX ADR 
13,50 (IMP lan EX AOR 



8ELECT DEVICE (AND PUT IN STATUS MODE) 



OTiUS <- IMP 

IF SWUSER THEN IVIOL* 

PSW <- PSW ,AND, (*l-8WSTDT5 MARK IT IN STATUS MODE 

(SEXADR) <- IMP SAVE THE EXADR ADDRESS 

OUTW0 



LDPP OTBUS,IMPI,SIOO 



TSTIP , SWUSER, PSWI 

BRA 1VI0L«,FZ 

OOPI PSWO,ND,--l-SlNSTOT 

DLDPI MARO,SEXAOR 



LOPP MOW.IMPI 

BRA OUTW0 

* 

EXSTATI 

, 11,60 ( 1233 EX STATUS 

, 13.60 CIMP 1233 EX STATUS 



OUTPUT DATA AND START FIRST DELAY 



SHOULD I HAVE DONE THAT? 



MARK IN STATUS MODE 



OUTPUT ADDRESS TO ITS SAVE AREA 



PUT IN STATUS MODE 



OTBUS <•» IMP 

IF SWUSER THEN IVIOL* 

PSW <- PSW .AND, (fl-SWSTOT) MARK IT IN STATUS MODE 

OUTW0 



LOPP OTBUS#IMPI,SIOD 



TSTIP ,SWU8ERfPSWI 

BRA IVI0L$,FZ 

OOPI PSW0,N0,»1«SW8T0T 



OUTPUT DATA AND START FIRST DELAY 



SHOULD I HAVE DONE THAT? 



MARK IN STATUS MODE 



BRA 



OUTW0 



OATAPOINT CONFIDENTIAL INFORMATION ' SEf PAGE I 



PASE 10 



215; 



PROC/TXT 
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, INPUT OUTPUT OPERATIONS 
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216, f00134L 

217, 

218, 

2l9l 

220, 

221, 

222. 

2231 

224; 



226'. 

227' 
228. 

2291 



0?it34|. 
0?0135L 

000137L 
0PI01401. 
000 141t 
000i42U 
0001431 
000144L 



00U0001 
00U0UI 

00110111 
00110001 
01000101 

11000010 

01010011 
00110111 
11001111 



EXDATAt 
, 11,60 
• 13,60 



UilUll 
00100000 
00101100 
11011100 
00000100 
00110000 
00010000 
10001100 
10010100 



( 1285 EX DATA 
CIMP 123) EX OATA 

0T8US <•< IMP 

IF SWUSER THEN IVIOLI 

PSW <f. PSW ,0R, SWSTOT 

OUTW0 

LOPP 0T8US,IMFJ,SI0D 



TSTIP ,SWUSERfPSWI 

BRA IVIOL$,FZ 

OOPI PSW0,QR,8WST0T 

BRA OUTW0 



PUT IN DATA MODE 

(HARK IN DATA MqdE) 

OUTPUT DATA AND START FIRST OELAV 

SHOULD I HAVE OONE THAT? 

MARK IN DATA HODE 
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230* 
231. 
232^ 

233 a 

234^ 
235^ 
236- 
237. 
2381 
239; 
2401 
2411 
242, 
243, 
244, 
245, 
246, 
247j 
248. 
249^ 
250, 
25lJ 
252, 
253, 
254, 
2S5. 

2S6l 
257, 

258. 
2591 
2601 



PROC/TXT 



OATAPOINT CONFIRENTIAL INFORMATION . SEE PAGE I 

MfCRO»PPOCESSOR EMULATION SUPPORT CODE • HJS • 
, INPUT OUTPUT OPERATIONS 



78JUL20 U544 



0PI0145L 



OUTPUT I 
11,60 
15,60 



tl i «2»3« 000) 
(IMP 1 5 EX COM 



( 1275 

(IMP 127) 

C 131) 

(IMP 131) 

C 1333 

(IMP 133) 

( 135) 

(IMP 135) 

e 137) 

(IMP 137) 



EX WRITE 
EX WRITE 

EX COMl 

EX COMl 

EX COM2 
EX COM2 

EX COM3 
EX COM3 

EX COM4 
EX COM4 



EX COM OUTPUT TO 55i0 BUS 

WITH OTHER THAN THE A*RES 

WRITE DATA TO THE OEVICE 
USING OTHER THEN A-REG 

00 CONTROL STROBE I 
USING OTHER THEN A^REG 

00 CONTROL STROBE 2 
USING OTHER THEN A-REG 

00 CONTROL STROBE 3 
USING OTHER THEN A"REG 

00 CONTROL STROBE 4 
USING OTHER THEN A-REG 



OTBUS «<• IMP 

IF USER THEN IVIOL 
OUTWai 

OELAY 

SOTS 

OELAY 
0UTW2J 

DELAY 

IP NOT STPFOU IN STATUS THEN FETCHW 
ELSE T <- 8V0UTP 
SCLST 



DELAY ei (ON DATA GOING DOWN BUS) 

DO COMMAND OUT STROBE 

OELAY J (ON COMMAND DOWN BUS) 

OELAY 2 (ON PARITY COMING BACK) 



( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
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26ll 
2«2. 



2831 

264* 

26s; 



2«6; 

2671 
2681 

269*. 
270, 
27ll 

272* 
2731 
27A\ 
275* 
2761 
277, 
278, 
2791 
280, 
281, 
282, 
2831 
284, 
28 S, 
286. 
287, 
2881 



2891 
290. 



PROC/TXT 



008145U 
000148t 
09»il47l. 
000J5<IL 
0ei0t5lL 
IS00152L 
0«it53l 
0001541. 
000155L 
i00156L 
80il57L 
00016«L 
000I61L 
000162U 
000163U 
000164L 
000165L 
000168L 
000167L 
0001701 
000i7lL 

0001721 



80U0001 
00110111 
00110111 

00110001 

01000101 

11000010 
00110001 
01000101 

U000011 

00110111 
00110001 
01000101 
11000011 
00110111 

0SI110001 
01000101 
11000011 

01000101 
11000011 
01010001 

11001111 



000172L 
000173U 
0001 7 4L 
000175L 
000176L 
000177L 



00110111 

00110001 
01010101 
00U0111 
00110111 

11001 HI 



110U1U 

00l0!»i00 
00101100 
11011100 
00000100 
00110000 
00110001 
00000010 
10010100 
00101111 
00110001 
00000010 
10010000 
00101100 
00110001 
00000010 
10001100 
00001000 
11000101 
00001100 

0010!101 



00101100 

U011100 
1101U11 

10001100 
00000100 
10010000 



OATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE • HJS * 
, INPUT OUTPUT OPERATIONS 
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OUTW0 



OUTWl 



0UTW2 



MOTPAR 

* 

MINOWT 
COMMON 



LDPP 0TBU8,IMPI,SI0D 



TSTIP iSWUSER.PSi^I 

8RA IVIOLS,FZ 

TSTIP ,8TI0DR. STATUS 

BRA OUTW0»TZ 

STB SOTS 

TSTIP ,8TI0DR»STATUS 

BRA OUTWl, TZ 

STB SIOO 

TSTIP ,8TI00R, STATUS 

BRA 0UTW2#TZ 

TSTIT ,STPFOU 

8RA FTCHICTZ 

LOTI SVOUTP 

BRA 8CLSTW 



OUTPUT DATA AND START ZEROTH DELAY 



ONLY CONTINUE IF PRIVED 



DELAY WAITIN5 FOR DATA TO REACH DEVICE 
GIVE COMMAND 



DELAY 1 WAITING FOR COMMAND TO GET THERE 
EXTEND THE COMMAND DELAY FOR FINAL STEP 



DELAY 2 WAITING FOR PARITY TO RETURN 

WAS THERE AN OUTPUT PARITY FAULT? 

NOl 

YES, TELL SUPERVISOR THAT THERE WAS 



MIN/MOUT FINAL TERMINATION CODE 

SIOD 

MODW *" PSW <•. PSW .AND, C-l-SWRPT) 

DELAY 

SIOD 
0UTW2 

STB SIOD DOUBLE DELAY AT THE END 

OOPIP PSW0,ND,-1-SWRPT,PSWI TURN QFF THE REPEATED FLAG 



LDPT 
BRA 



MODW 
OUTWl 



RESET IT AND EI/DI BITS 

GO TO FINAL DELAYS AND PARITY CHECK 



f 

( 

( 

( 

( 

( 

( 

( 

< 

( 

< 

( 

( 

( 

( 

< 

( 

( 



OATAPOINT CONFIOgNTIAL INFORMATION • SEE PAGE I 
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29ll 
292, 
293; 
294. 
295. 
296^ 
2971 
298. 
299, 
300, 

3eti. 
302, 
303, 
304, 
305, 
306, 
307, 
308, 
309, 
310, 
311, 
312. 
313* 
314, 
315, 
316, 
317, 
318, 
319; 

3201 
321. 

322*. 

3231 
3241 

325^ 
326' 
327, 
328. 



PROC/TXT 



MICPO»PROCESSOR EMULATION SUPPORT CODE • HJS 
, INPUT OUTPUT OPERATIONS 



78JUt20 11144 



329i 

3301 
33 1 1 



000200L 



0002»0L 
000201L 
0002021 
0002031. 
000204L 
a002f5L 
000206L 
000207L 
00021BL 
000211L 
000212L 
000213L 
0002141 
000215L 
000216L 
000217L 
000220L 
000221L 
0002221 
000223L 
0i0224L 
000225L 
000226L 
000227L 



00110001 
01000101 
11000010 
01010101 
00110111 
00110001 
00110001 
00110111 
00110001 
01000101 
11000011 
01000101 
11000010 
00110001 
00110U1 
00110111 
00110001 
00010110 
00110111 
0011000) 
00110110 
01010001 
0U01111 
11001111 



11011100 
00000100 
00U0000 
11111110 
00000100 
11000110 
11100101 
00101100 
00110001 
00000010 

01U01U 

00000100 
10111101 
00010100 
00101011 
00100001 
10010000 
01110010 
10000110 
10110000 
10000101 
00110001 
10U0001 
01001101 



MINI 

NOTEt IF EI / MIN, THE EI OOESN'T TAKE EFFECT UNTIL TmE INSTRUCTION 
AFTER THE MIN, ONE LATER THAN ON 5500 

BUT, TF MIN INTERRUPTED AT MACRO LEVEL FOR ANY REASON, 
WHEN IT IS RETURNED IT WILL BE AS IF THE EI HAD ALREADY TAKEN EFFECTl 



fill 061) MIN 
9,4S ♦ C ♦ 8,40 

t 061) MIN 

(IMP 0Sn MIN 



MINW0 



5500 COMPATIBLE (UNNECESSARY MiN) 

MULTIPLE INPUT UNSPECIFIED 
UNSPECIFIED UNNECESSARY MIN 



IF USER THEN IVIOL 

ELSE MOOW <• PSW .AND, fl ^ 8WINTE 
DELAY 

IF STPPIN IN STATUS THEN MINPAR 
ELSE (HL) «* INBUS 
SINS 

HL «•• Hi. ♦ 1 
TEMPI <• CQOMIN 



MINOUTI 



DELAY 

T <• URC <- URC * I 

IF (T ,ANO. 017) ■ ZERO THEN MINOWT 

ELSE IREG <- TEMPI 

IF 8RVREQ THEN SRVRPT 
ELSE lOCOO (IREG) 



TSTIP ,8WU8ER,PSWI 

BRA IVIOL*»FZ 

DOPI M0DW,ND,-1»SWINTE 

DLOX HL2MR 

STB SIQD 

TSTIP ,STI00R, STATUS 

BRA M1NW0,TZ 

TSTIT .STPFIN 

BRA MINPAR, FZ 

LOPP SINS, INBUS, MOW 



DAOOP UR0*UR,MARI 



LORI TEMPI, C00MIN,CC 
BRA MINOUT 



ONLY CONTINUE IF PRIVEO 
DISABLE ONE MS. INTERRUPTS 

PRELOAD MAR WITH WHERE TO SAVE DATA 

START ZEROTH DELAY 
WAIT ON INITIAL DELAY 



00 NOT CONTINUE IF PARITY FAULT 

GET DATA FAST ACKNOWLEDGE AND SAVE IT 



UPDATE HL, SADLY CAN'T BE TOO FAST 

NEEDED ONLY FOR COMMON SPEEDUP CODE 
GO TO COMMON MIN/MOUT CODE 



OATAPOINT CONPIOENTIAL INFORHATION - SEE PAGE X 
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332 



PROC/TXT 



NICRO-PROCESSOR EMULATinN SUPPORT CODE - HJS - 
, INPUT OUTPUT OPERATIONS 
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333- 000839)1 

334^ 

335, 

336. 

337^ 

338^ 

339. 

340' 

34i: 

342. 
343' 

344. 
345; 
346. 
347, 

348^ 
349, 

3S0: 
35i; 

352. 
353; 
354. 
355, 
356. 



357. 

3581 
359. 

36Sli 
36i. 

3fi8l 



3631 
3641 

365!^ 
366 • 
3671 
368, 
369; 
3701 

37 ll 

3721 



0P»023«L 
0002311, 
0002321. 
0£»0233L 

000234L 
000235L 

000236L 

0S)0237L 

0e»5l24?iL 
000241L 
B0PI2421. 
000243L 
0B0244L 
0PI0245L 
000246L 
000247L 
@(i»025eiU 
iP>(»25tU 
0002521 
000253L 
000254U 
0002551, 
000256t 
000257L 
0002601. 
00026JL 
000262L 



0011000! 

0011000! 

00U01U 

00110001 
01000101 
11000010 
01010101 
00110111 

11000100 
1 J 0001 11 
00110001 

00110111 

00110111 

01010001 
00110111 
00110001 
01000101 
11000011 
01000101 
11000010 

00U0111 
00110111 
00110001 
00110001 
01010001 
01101111 



11000110 
11100101 
01000111 

U011100 
00000100 

00U0000 

11111110 

00000100 

01011111 
00001100 
00110110 
00100000 
00101100 
01010111 
00000000 
00110001 
00000010 
01011000 
00001000 
10000111 
00101111 
00001100 
10000110 
10100101 
00111001 
10110001 



t 

MOUTJ 

NOTE: IF EI / MOUT, THE EI DOESN'T TAKE EFFECT UNTIL THE INSTRUCTION 
AFTER THE MOUT, ONE LATER THAN ON 5500 

BUT, IF MOUT INTERRUPTEO AT MACRO LEVEL FOR ANY REASON, 
WHEN TT RETURNS, IT WILL BE AS IF THE EI HAD ALREADY TAKEN EFFECTl 



cm 071) MOUT 

C 071) MOUT 
9,45 ♦ C * 8,75 

(IMP 071) MOUT 



MOTW0 



FOR 5500 COMPATIBILITY (NOT NECESSARY) 
MULTIPLE OUTPUT UNSPECIFIED 

UNSPECIFIED UNNECESSARY IMPLICIT CODE 



IF USER THEN IVIQL$ 

ELSE HODW <m PSW ,AND. C-1*SWINTE) 
OTSUS <» CHL) 

IREG <- COOWRITE SO THAT SOTS WILL BE CORRECT 
OELAY 

IF STPFOU IN STATUS THEN MOTPAR 
ELSE SOTS 

HL <- HL + 1 

DELAY 

TEMPI <■ COOMOUT SO THAT REPEATS WILL BE CORRECT 

MINOUT 



DLOX HL2MR,,SMR 



TSTIP ,SWUSER,PSWI 

BRA IV10LS,FZ 

OOPI M0DW,ND,-1-SWINTE 



MWAIT ,MEMPF0 

LDPP OTBUS,MDR,SIOO 



LOPI 


LIREG,CODWRT 


TSTIP 


,STIODR, STATUS 


BRA 


MOTWe,TZ 


TSTIT 


, STPFOU 


BRA 


MOTPAR, FZ 


STB 


SOTS 


STB 


IMAR 


OLDX 


MR2HL 



LORl TEMPI, CODMOUT,CC 



GET DATA AS SOON AS POSSIBLE 

ONLY CONTINUE IF PRIVED 

DISABLE ONE M.SEC, INTERRUPT 

?? CHANGES BASE ENABLE/DISABLE BIT ?? 

OUTPUT DATA AND START DELAY 

FIX IT UP FOR THE SOTS 

DELAY WHILE DATA GETS TO THE DEVICE 

00 THE PARITY CHECK (FASTER THAN EX COM) 
OK, SO DO THE COMMAND NOWi 

UPDATE HL (THIS IS FASTEST WAY) 

FOR MINOUT CODE 



MINOUT 



DATAPOINT CONFIOENTJAL INFORMATION - SEE PAGE 1 
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373'. 



PROC/TXT 



3741 
375, 
376, 
377, 



385 



3861 
387^ 
388, 
389; 



0008631 
0e»55264L 



5IPI0265L 

05!0266L 
0002071. 
0032701 
000271L 

000272L 
000273L 



3781 

3791 
3801 

38 1 

382! 000274L 

383, 

384. 



000274L 
00027SL 
0002761, 
000277L 



00110001 
01000101 

110«00U 



00110001 
01010100 
00110111 
01000101 
U0?li0ll 
01110001 
00U0111 



I 1000100 
11000111 
00110001 

10100011 



00110001 
00000010 

01001101 



11010010 
00000001 
01100010 

00001111 
10000101 

11110001 
00000000 



01000011 
00001100 
00110000 

00110011 



>000300L 0101100} llllllll 
»000301L 11001111 llllllll 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS • 
, INPUT OUTPUT OPERATIONS 



MINWl 



♦ * ♦ 



* 
RINSIO 



TSTIP iSTIOOR, STATUS 



78JUL20 11:44 
WAIT ON ACK, TO GET TO THE DEVICE 



BRA MINWl, TZ 

7,00 • MOUT 

6,6S - MIN 

OOPIP URFO*URC,Sa,l»URI+URC DECREMENT THE COUNT IN C 



TSTIT ,017 

BRA MlNOWTfTZ 

LOPR LIREG. TEMPI 



RASE 16 END? 

COMPLETE AS A SIMPLE EX COM 

RESTORE TO MIN OR MOUT 



THIS CODE IS SIMILAR TO RINST CODE ON THE REPEATED PAGE 
MWAIT ,MEMPP0 WAIT ON MIN MOW TO FINISH 



TSTPT FI,8RVREQ 
BRP lOCOOLiTZ 

8RAX 8RVRPT 



ANY SERVICE REQUESTS? THEN DO THEM 
ELSE, CONTINUE MIN'ING OR MOUT'INS 
ei KNOW ITS ON THIS PAGE) 
00 SERVICE 



OATAPQINT CONFIDENTIAL INFORMATION - SEE PAGE I 
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392, 

393^ 
394^ 
395^ 
396. 
397, 
398^ 
399^ 
480. 
401. 
402' 
4«3. 

Am, 

Aff)7l 

4P)8l 
409. 
410' 
411. 

418; 
413. 
4Ul 
41S, 
4161 
417' 
418. 
4I9J 
4t0, 
421, 
482'y 
423. 
4241 
425^ 
426, 
4271 
428^ 
429, 
430, 
431. 
432; 
433, 
434, 



PROC/TXT 



»!55)0302L 



0003l?i2L 
0f?e!303L 

0P!03!?l4t 



01010001 

Uiflllll 



SS0 1100910 
«0UI§I10 



09t0304L 01010001 00101010 



000305L 



000305L 
000306L 
000S07L 

0003101 



0110U11 
00U011J 
11»«1U1 



11110010 
00001100 
00100110 



435; 



000310L 
0003111 
000312L 
000313U 



011591111 

01010001 
011(^1111 

U001U1 



11110010 

11110000 
11110001 
00100010 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS 
, SYSTEM CALLS AND OPwCODES FOR IT 



78JUL20 111 44 



SCI 

10,10 



NOTEl FOR INSTRUCTION ENTRIES THE WAY THE PC SHOULD 8E LEFT IS SPECIFIED 



p: 

1«,30 



CBP 
10,00 



SCROML; 



8CR0M: 



SCROM! 



( 



0523 8P 



T <■ SV8KPNT 
SCBP 



LDTI 
BRA 



C 



SV8KPNT 
SC8P 



0673 SC 



T «■ SVSCAL 
SC8P 



LOTI 
iRA 



SVSCAL 

SCBP 



TEMPL <m T 

MAR <f HAR ♦ I 
8CPC 



LORT 

STB 

BRA 



TEMPL 

IMAR 

8CPC 



TEMPL <■ T 

TgMPH <■ SY8R0M>8 
8C00N 

LDRT TFMPL 

LDRI TEHPH,SYSR0M>8 

BRA SCDON 



** PC LEFT AFTER THE INSTRUCTION *♦ 
BREAKPOINT 



DEBUGGING BREAKPOINT RAM VETCOR 



*♦ PC LEFT AFTER THE INSTRUCTIOsHj *♦ 
SYSTEM CALL (SUPERVISOR CALL) 



SUPERVISOR CALL RAM VECTOR 



** UP THE PC TO NEXT INSTRUCTION *♦ 
** RAM VECTOR FOR INTERRUPT *♦ 



RAM VECTOR SAVED 
CORRECT THE PC 



** ROM VECTOR ENTRY, PC ALREADY OK? *♦ 

♦* FAULT INSIDE MEMORY FAULT ROUTINE ♦* 

♦ * MEMORY OR SECTOR TABLS PARHY ERROR * 

** RESTART, DEC PC ALREADY DONE AS NEEDS 



DATAPOINT CONFIDE^JTIAL INFORMATION • SEE PAGE I 
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436*, 

437'^ 

438 . 

439. 

440' 

441, 

442^ 

443 • 

444, 

44S 

446. 



A47\ 

AAr 

AA9 

4501 

45U 

452. 

453. 

454*. 

455' 

4S6, 

457; 

498 « 

459J 

400, 

461, 

462. 

4631 

464. 

4651 

466, 

467, 

468. 

469* 

470, 

471, 

472; 

473' 

474, 

475! 

476, 

477* 

478, 

479, 

48i, 

481 

4821 



PROC/TXT 



483. 
484, 

4851 



§PIPI314L 



000314L 
0Plf3l5L 
000316L 

000317L 



0011000J uaiuaa 
0l0i0l?!l 00ffl00lii 

11000011 0010U10 



0003171. 01il000! 00011110 
000320L 1100111J 00101101 

0003211 



000321L 01010001 00110110 
000322U 



000322L 11000100 00101101 
000323L 11000111 00001100 

000324L 0110H11 11110010 



MICPD-PROCESSOR EMULATION SUPPORT CODE • HJS * 
, SYSTEM CALLS AND flPf-CODES FOR IT 
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UDPOPJ 

10,10 f 0005 HALT 
10,10 f 0013 HALT 
10,10 ( 377) HALT 
10,40 IF IN USER MODE 

IF NOT USER THEN UOOP 
IVIOL* 

TSTIP ,SWUSER,PSI»(I 



BRA 



UDOP,TZ 



IVIOLSJ 
. li,15 



* 

UDOPI 
9,75 
9,75 
9,75 
9,75 
9,75 



eil If IMP NON-ZERO) 

T «■ SVIVIOL 

SCLSTI 

LOTI SVIVIOL 

BRA SCLSTW 



147) 
171) 
173) 
175) 
177) 



♦2,85 IF IMP SPiClFlEO 

T <■ SVUAINS 
SCLST 



LOTI SVUAINS 



* 
SCLSTW 



SCLSTi: 

SCLST; 

SCOECPJ 



TEMPL <»• T 

IF IMP ZERO THEM ScnON 

MAR «f PC " 1 
SCPC 



MWAIT ,MEMPF0 



** PC LEFT AT NEXT INSTRUCTION ** 
UNDEFINED PRIVILEOGED OP 
UNDEFINED PRIVILEOGED OP 
UNDEFINED PRIVILEOGED OP 



UNDEFINED IF IN USER MODE 

♦* PC LEFT AT LAST INSTRUCTION ♦* 

TRIES PRIV'D INSTRUCTION WHILE USER MODE 



♦* PC LEFT AT LAST INSTRUCTION *♦ 

UNDEFINED OPitCODE 

UNDEFINED 0P»CO0E 

UNDEFINED OP-^COOE 

UNDEFINED OP*C00E 

UNDEFINED OP-iCODE 



UNDEFINED OP»COOE VECTOR SY8CALL 

*♦ RAM VECTOR INTERRUPT ♦* 

** 5500 I/O BUS PARITY ERROR *♦ 

♦♦ BACKUP PC TO START OF *♦ 

♦* INTERRUPTING INSTRUCTION ** 



SCLSTI LORT TEMPL 



SAVE RAM VECTOR ADDRESS 



OATAPOIWT CONFIOENTIAL TMFORMATION - SEE PAGE i 
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PPOC/TXT 




MICRO-pPROCESSOR 


EMULATION SUPPORT CORE 










• 


SYSTEM 


CALLS 


AND OP^COOES FOR IT 


486* 
487. 


000325L 


110)'I1001 


00100100 


SCUSTi 


BRA 


SCRAM, T*,n 
















4881 








* 








489^ 


0e«0326L 






SCOFCP 






490. 








t 


9.90 






491. 


008326L 

000327L 
0(i033ei|, 


00110001 
00110001 
00110111 


11001001 
11101000 
00001101 






ninx 


PC2MR,,DMAR 


492' 








* 








4931 


0003311, 






SCPC 






494' 








■ 


9,75 






495. 








• 




PC <• 


MAR 


4961 








• 








497; 


000331L 
e(?i0332L 


00110001 
00110001 


10001001 
10101000 






0LD5t 


MR2PC 


498* 








* 








499. 


000333L 






SCRAMI 






500. 








■ 


9.45 






5«1. 
















5i2. 








t 








5031 








• 




TEMPH 


*u SYSIVR»8 


504^ 








■ 




SCDON 




505. 








f 








seiel 


000333U 
0003341. 


01010001 
01101111 


U 101111 

11U0001 






LORl 


TEMPH, SVSIVR>8 


507' 

508, 








* 








e^00335L 






SCOONS 






509. 












STW (SV8ROM>85 «« 8Y8R0M>8 


510* 
511, 












CSPCP8W)) «- PSW 












PSW *m 


P8W .ANO, (-l-SWSCF) 


512, 












IMP «■ 


PCL 


513, 
514, 












PSH8T0 


CPCMOO) 
















515, 
516, 










8.95 


INCU. 


IFETCH 
















517. 


000335L 
000336L 


01010001 
00110111 


11110000 

11100000 






LOPI 


MAROH,SySRaM>8,ANO,0360 


518* 


000337L 


00110111 


00000101 






LDPT 


STW 


519. 


000340L 


01010001 


iiai0000 






LDTI 


0300 


520I 


000341L 


00110101 


11001011 






OOP 


SP2MRL,ND 


5211 


0003421. 
000S43L 


00110001 
00110111 


11101010 

00001101 






LOX 


SP2MRH,DMAR 


5221 


000344L 
000345L 
000346L 


00110001 
01010101 
00110111 


11011100 
11011010 
00000100 






OOPIP 


M0DW,N0,*1-SWSCF,PSWI 


5231 


0003471 
080350L 


00110001 
00U0111 


11011100 

00100001 






LOPP 


MON,PSWI 


524'. 


000351U 
0003521. 


01010101 
00110U1 


11011010 
10001100 






OOPI 


P8N0,N0,«1-SW8CF 


5251 


0003531. 
0003541. 


01010001 
00110111 


00001001 
00000001 






LOPI 


LIMP, PCL 


5261 


000355L 


11000100 


00010010 






mfkll 


# IGNORE 



78JUL20 11144 



POINTS TO START OF LAST INSTRUCTION, 
*♦ I MSEC INTERRUPT WHEN REPEATEO *♦ 



BACK {iP TO IMP SPEC cone 



** SYSTEM CALL PERFORM SECTION *• 



SAVE P.C. AS SHOULO BE 



♦* RAM VECTOR DOESN'T WANT PC BACKUP ** 
♦* MEMORY, ACCESS « WRITE VIOLATIONS ** 
** 1 MSEC INTERRUPT WHEN NOT REPEATED ** 



(CORRECT LAST SECTOR TABLE ENTRY) 
(SAVE THE PSW IN SYS SAVE AREA) 



PUSH PC ON STACK A^O 50 TO TEMP 

CORRECT ENTRY 017 TO BE SURE 
IN THE SECTOR TABLE 
POINT TO THE PSW SAVE BYTE 



SAVE ORIGINAL PSW IN ITS SAVE AREA 
SET MEW SYSCALL FLAGS 
GET SET FOR PUSH OF THE P,C, 
WAIT ON WRITE & IF ERROR, TROUBLE 



OATAPOINT CONFIOENTIAU INFORMATION • SEE PARE I 
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587. 



588. 
589' 
830, 
531^ 
532^ 
533, 
534. 
535^ 
536, 
537, 
538, 
539, 
540. 

54ll 
542. 



>0S0356L 
>090357L 
>0?!0369IU 

0t^S!l361L 



110iPlll9' 



U t U 1 u 
1 1 1 1 ! U I 



?!0i36iL 0i0i0ii?ti ^mmnB 

0803631 UiaailU UW100U 

>000363U 010Jl«»0i U HI til 

>00g364t U09inil HtUlll 



3(»?I365L 
06I0366L 
0i0367L 
0?|0379)L 
0(?'0371U 
0«0372L 
a0«373!. 
iWa374l. 
000375L 

0aa37«L 

g00377L 



till 

111! 

iiii 

IIH 
UH 

uu 
un 

UH 

UH 
Utl 

uu 



uu 
uu 
uu 
uu 
uu 

1U1 
lUI 

uu 

Ull 

uu 

lUl 



uuuu 

1 U U U I 

uuuu 

1 U U 1 u 

uuuu 

lUUUl 
lUUUl 
lUUlU 
U 1 i u u 
1 U I U 1 1 
1 U U 1 u 



MICRO-PRQCESSOR EMULATION SUPPORT CODE - HJ8 - 
, SYSTEM CALLS AND np-COPES FOR IT 



BRCX PShST0,F#,MP,PCMOO 



78JUL2i 1X144 
IF NO FRROR, GO TO IT (SAVED I NORO) 



MEMPFSC 

WOWl SYSTEM SAVE AREA HAD SECTOR TABLE OR WRITE PROTECT FAULT 
USE THE ROM VECTOR POINT TO MARK A DOUBLE RAD INTERRUPT 

TEMP <8 SRSYSMF 
FETPC 



MEMPF0 



LOTI 
BRA 

BRAX 



SRSYSMF 
FETPC 

HEMPFS 



DO SPECIAL INTERRUPT 

FORGET PUSH, WILL PROBABLY NOT WORK 



TABPAGE PROCL 



OATAPOtNT CONFIDENTIAL INFORMATION f SEC PAGE I 



PA8E ??» 



545; 
546 . 
547, 
548^ 
549y 

55lJ 
552! 
553I 
554. 
S55, 
556^ 
557. 
550, 
559, 
560, 
561, 
562, 
563. 
564. 

5651 
5661 
567. 
568'. 

569'. 
570', 
571, 
5721 
573, 
574, 
575, 
576; 

577* 
578, 
579, 

580, 
581, 
582, 
583, 
584, 
585, 
586, 
5871 
588, 
589. 
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MICRO-PROCESSOR EMULATION SUPPORT CODE -• HJS f- 
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00t94?l?!L 



00040ffL 
000401L 
00040?L 
000403L 
000404L 
g9)0405L 
000406L 
000407L 
0004101. 
000411L 
0004l?L 
000413L 
000414L 

000415L 



001 1000! 
01000101 
11000010 
01000101 
11010010 
11011011 
01000101 
11011000 
11010010 
01010011 
00110111 
0101000} 
11011111 



U011100 
00000100 
00110000 
00100000 
11000110 

11000110 
10000000 
11110010 
00000101 
00100000 
10001100 
00111110 
11100100 



BETAS 

30,70 C 020) BETA 
(13,55, 17,45) IF SPLIT 

19,55 fill 020) 8ETAL 
flOO 020) 8ETAL 



SAVE ALPHA REGS AND LOAD SETA SET 



LOAD REGS FROM 8ETA SAVE AREA 
UNSPECIFIED 



17,65 f062 020) 8VSSAV 
m .10 IF BETA SAVED 

CIEV 020) SYSSAV 



SAVE SYSTEM REGS 
UNSPECIFIED 
NOTEI CAN NOT IMS. INTERRUPT BETWEEN BETA * FOLLOWING INSTRUCTION, 



ALPHAS 

SYSSAV 
17,65 



000415L 1101001! 
0004 ISt 11011111 



11110100 
11100101 



IF USER THEN IVIOLS 

ELSE IF IMP OOn OR SWRPT IN PSW THEN 8ETAL 
ELSE IF IMP NOT ZERO THEN SYSSAV 

ELSE IF SWALBT IN PSW THEN FETCHI 
PSW «- PSW .OR, SWRPT 



ALPHASI 



TSTIP ,SWUSER,PSWI 



T <" SESAVAF 
MOOSAV 



BRA IVIOLS, FZ 

TSTIT , SWRPT 

BRA BETAL,FZ 

BRA 8ETAL,T#,I0 

TSTIT ,8WALBT 

BRA SYSSAV, F#,IZ 

BRA FTCHIA8,FZ 

OOPI PSWO, OR, SWRPT 

LDTI SESAVAF. AND, 0177 

BRA MODSAV 



f062 020) SYSSAV 



p0,l0 IF SAVING BETA REGISTERS 

IF SWALBT IN PSW 
THEN BETAS 
ELSE ALPHAS 



ONLY IF PRIV'D 



IF REPEATED DO SECOND HALF 

IF ODD. ONLY LOAD BETA REGS 

TEST HERE, SYSSAV NEEDS IT 

SYSTEM SAVE IF NON^ZERO 

SIMPLE BETA, FORGET IT. ALREADY IN BETA 

TWO PARTS, SO REPEATED 

POINT TO CORRECT SAVE AREA C7 BITSl) 



SYSTEM SAVE WHICHEVER REGISTERS ft FLAGS 



BRA 
BRA 



ALPHAS, TZ 
BETAS 



SAVE ALL REGISTERS TO THE ALPHA SgT 
NO, TO BETA SET 
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590. 

59ll 

5921 

593, 

594 

595' 

596, 

597. 

598' 

599, 

em, 

601, 

eeia: 

603, 
604^ 
605, 
606, 
607y 
608, 
609, 
610* 
6llJ 
612, 
613', 

614' 
615, 
616, 
617, 
618, 
619, 
680, 
621. 
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000417L 



6221 
623. 



000417L 

000420L 
000421L 
00042gL 
000423L 
000424L 
000425L 
000426L 
i00427L 
00i430L 
000431L 
000432L 



00110001 
01000101 
11000010 
01000101 

11010010 
11011011 
11011000 

01000101 
11010011 
01010011 
00110111 
01010001 



11011100 

00000100 
00110000 
00100000 
10100011 
10100011 
10111010 
10000000 
00000101 
00100000 
10001100 
00110101 



ALPHA? 

30,70 f 030) ALPHA 

(13.35, 17,55) IF SPLIT 

19,65 cm 030) ALPHAL 

(ino 030) ALPHAL 

27,10 (062 030) SYSRET 

flEV 030) SVSRET 



SAVE BETA REGS AND LOAD ALPHA SET 



LOAD REGS FROM ALPHA SAVE AREA 
UNSPECIFIEO 

RESTORE REGS ANO RETURN 
UNSPECIFIED 



NOTE? CAN NOT IMS, INTERRUPT BETWEEN ALPHA » FOLLOWING INSTRUCTION, 
NOTE: ALPHA UNPROTECTED IN 5500 BY OEFN, OF OLD PROCESSOR MANUAL 

IF USER Then iviols 

ELSE IF IMP ODD OR SWRPT IN PSW THEN ALPHAL 
ELSE IF IMP NOT ZERO THEN SYSRET 

ELSE IF SWALBT NOT IN PSW THEN FETCHI 
PSW «- PSW .OR, SWRPT 
BETASI 

T <* SESAV8F 

modsav 



TSTIP ,SWUSER,PSWI 



BETAS 



BRA 


IVIOLS,FZ 


TSTIT 


, SWRPT 


BRA 


ALPHAL, FZ 


BRA 


ALPHAL, T#, 10 


BRA 


SYSRET, FP,IZ 


TSTIT 


»SWAL8T 


BRA 


FTCHIA8,TZ 


OOPI 


P8W0, OR, SWRPT 


LOTI 


SESAVBFUnO,0177 


BRA 


MODSAV 



ONLY IF PRIVEO 



IF REPEATED JUST DO SECOND HALF 
NO SAVE, JUST 00 ALPHA LOAD 
RELOAD REGS * RETURN 
IS A SIMPLE ALPHA INSTRUCTION 
FORGET IT, ALREADY IN ALPHA MOOE 
MARK REPEATED BECAUSE 2 PARTSi 

(7 BITS) TO POINT TO THE SAVE AREA 



OATAPOINT CONFIOENTTAL INFORMATION * S|f PAGE I 
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624*. 




625' 


0B!0433L 


626. 




627. 
628^ 






629, 
630, 






631. 




632. 




633^ 




634. 




635. 




636. 




6371 





MICPO-PROCESSOR EMULATION SUPPORT CODE • HJS - 
, RE6L, ALPHA, BETA MOOl SWAPS AND 8UP«PART8 
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638, 
639^ 
640^ 
641, 
642, 
643. 

644*. 

645* 
646. 

647*. 

648; 

649, 

6501 

esil 

652, 

653. 
654*. 



655^ 
656, 
657. 

658*. 
659^ 
660, 
661, 
662. 
663*. 

664*. 



665. 



?'(?i0433L 
9!^0434L 
0«0435L 
000436L 
0i0437L 
0@»044I>IL 
0«8I44JL 
5»0?t442L 
000443L 
0!»ei444L 
000445L 
000446L 
Sia0447L 
f0045(?IL 
0B0451L 
ei«50452L 
0a0453L 
@|@I0454L 
0M0455L 
0?!l?l456L 

0e0457L 
f50046OIL 
ia046tL 



000462L 
000463L 
000464L 
000465L 
g00466L 
000467L 
00047ftL 



01101U1 

00110001 
01010101 
01110011 
00110111 
00U0001 
0»110001 
0101010! 
00110111 
01010001 

i«<U0111 

00110111 

00Ufl00! 

11010100 

11000111 
00110111 
001 10! 11 
U011000 

00110001 
0108^ 5^101 

11010011 
01010!01 
00110111 



00li0P!0i 
11010010 
00110001 
01000101 
11010100 
1100011! 

It010010 



11U0010 

11011011 

10000000 

11! 10010 

11000000 
11101010 
00110101 
11000011 
00100001 
00010000 
00000001 
00001001 

U011111 
11010111 

00001100 
00001101 
00l0«00l 
11«11001 

11011100 

5*0100000 

01100110 
11111110 

00000100 



00110000 
10111100 

11011100 

10000000 
11001001 
00001100 
10100011 



HOOSAV 



11.15 



SAVE FLAGS AND REGS IN SAVE AREA 



CAND all REGISTERS) 



MAR <m £SPH, SPIL.AND,0200,OR,T) 

(MAR) <* UCFL6 (IN SYSTEM SAVE AREA SAVE FLAGS) 

IMP 4m 8 

REPEAT IMP <iP IMP • 1 
MAR <• MAR - 1 
(MAR) <•- IMP 
UNTIL IMP ZERO 

IF SWRPT NOT IN PSW THEN FETCHW IF NO REPEATED BIT, WAS SY8S 
ELSE HOOW <• PSW ,ANO, -I-SWINTE 

IF SRVREQ NOT ZERO THEN SRVOO 
ELSE IF SWAL8T IN PSW 
THEN ALPHAL 
ELSE BETAL 

LORT TEMP2 

DOTIP ,ND,?I200,SPIL 

OOPR MAR0L,0R,TEMP2 

LDX 8P2MRH 

OOPIP MDW,Nn,0303,UCFLG 



LOPI LIMP,IMP8 



SAVE AWAY FOP THE MOMENT 

GET 128 BYTE BOUNDARY 8IT (I MS8IT) 

COMBINE WITH THE FLAG ADDRESS 

MSB STACK POINTER IS SAVF AREA ALSO 
SAVE THE FLAGS, ONLY 4 BITS OF INTEREST 



INIT COUNT 



MOOSVLP STS 
LDTP 
MWAIT 



OIMP 
IMPI 
,MEMPF0 

OMAR 

MOW 

MOOSVLP, F#,IZ 



STB 

LOPT 

8RA 

TSTIP , SWRPT, P8WI 



8RA FTCHABW,TZ 

DOPI M0DW,ND,"1»SWINTE 



, INLINE RINST COOEUi 

TSTPT FI, SRVREQ 

BRA MOOSRV,FZ 

TSTIP ,8WALBT,PSWI 

MWAIT fMEMPF0 

BRA ALPHAL, FZ 



SPEEDUP, GET DATA NOW 



SAVE THE REGISTER 

LOOP TILL ALL 8 REGS. ARE SAVED 
WELL, ONE OR TWO PARTS? 



ONLY SYSSAV, NO-LOAD NEW REGS, 
TEMPORARILY DISABLE INTERRUPTS FOR IT 



ANY REQUESTS PENDING? 

YES, DO THEM AND I HOPE NO TROUBLE 

WHAT WAS IT? 

NEEDED AFTER MOW AT END OF LOOP ABOVE 

WAS BETA, DO ALPHAL NOW 



DATAPOINT CONFIDENTIAL TNFORHATION • SEE PARE I 
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MICPO-PROCESSRR EMULATION SUPPORT CODE - HJS * 
, REGU, ALPHA, BETA MODE SWAPS ANH SUB-PARTS 



BRA 



BETAL 



78JUL20 11M4 
WAS ALPHA 00 BETAL NOW 



OATAPOINT CONFIoeNTTAL INFORMATION • SEE PAGE I 



PASE 84 



6«7. 

668, 

669. 

670' 

671. 

672 

673. 

674, 

675, 

676. 

677' 
678, 
679. 

6801 

681'. 

682'. 



PWOC/TXT 



683, 
684, 
685^ 
686. 



687. 

688^ 

6"9 , 

690' 

69J 

692, 

693j 

694, 

69S, 

696. 

697' 

698, 

899, 

700, 

7(81, 

7^21 

7ei3, 

704, 
7PI5^ 
706, 
7(?7, 
7i8, 
709. 
7i0l 
7tl, 
712, 
713. 



0B0471L 



0ei«471L 
0(?«472L 
00i473L 
000474L 
00i475L 
0f§476L 

00050«L 

0!?05?I2L 

>0e!l35g3l. 
>0i0504L 

PI00506L 



0101 

0101 

0011 

8011 
0011 
0011 
0101 
0101 

H0i 



0001 
010) 
0011 
0111 
0001 
0111 
0001 
0011 
0101 

nil 



01011001 
11001111 



11011011 
10000000 
00110101 
1 1900000 

11101010 

PI1000111 
110U100 

10000000 
11011111 

100110U 

UUllU 
lllllUl 



MICPOwPROCESSOR EMULATIOM SUPPOPT CODE - HJS 
, REGL, ALPHA, BETA MODE SWAPS AND SUB-»PARTS 
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+ 

BETAL 
19, 5S 



fill 020) 8ETAL 
(lOD 020) BETAL 



27,10 f062 0S0) SVSRET 



UOA0 REGS FROM BETA SAVE AREA 
UNSPECIFIED 

ONLY IF TO BETA MODE 



MAR «-» SPH, CSPU .AND, 300) ,0R, SESAVBF 
T <• P8W ,0R, SWAU8T .AND, -1-SWRPT 
MODLDD 
14,60 TO FETCH (NO FETCH) 



OOTIP 
DOPI 

DOTIP 

DOTI 
BRA 



,NO»0200,SPIL 

MAROL, OR, SESAVBF, AND, 01 77 

SP2MRH,SMR 

,OR,SWALeT,PSWI 



POINT TO BETA FUAGS IN SAVE AREA 



iNOf-l-SWRPT 
MOOLOO 



* 
MOOSRV 



SVSRET 

* 
* 



BRAJ< SRVOO 



SET BETA MODE 

RESET REPEAT FLAG (IF SET) 

GO TO SERVICE AS NEEDED CMODSAV USES IT) 



NOTEl THIS INSTRUCTION IS VERV LONG IN EXECUTION 

IF DMA SLOWS IT EVEN FARTHER WE MAY HAVE PROBLEMS 



♦ WARNINGI 

♦ THENJ 

* 
* 

♦ WARNING? 

* 



IF AS SOLUTION TO LENGTH IT IS DONE AS REPEATED INSTRUCTON 

IF INTERUPTED CI,E, BY RESTART^DEBUG INTERRUPT) 

THE PC WILL REFLECT THE ADDRESS OF THE INSTRUCTION TO RETURN 

TO, WITH REPEATED FLAG ON AND THE INCORRECT REGISTER SET IN THE 

SUPPORT REGISTERS (THE ALPHAL OR BETAL NOT COMPLETEDJ) 

THIS IS VERY BAOi BUT POSSIBILITY IS LOW AND NO SOLUTION SEEN 

IF INSIDE SVSRET (REGISTER LOAD PART) THERE IS A MEMORY FAU|.T, 
THE PC WILL BE INCORRECT BECAUSE OF A SPECIAL PRE»OFCREMENT, 
IF THE IMP WAS NON.-ZERO, IT WILL BE EVEN FARTHER OFF 



27, ?0 (062 030) SYSRET 
(IMP 030) 



SYSRET: 



IMP <■ PCL 

POP8T0 (SYSRET) 

I 

I 

PC <• RC "l 

PSW <m (SP (PSW)) 
IF SWALST THEN BETAL 
ESLE ALPHAL 



SYSTEM RETURN (FROM 8C, PP, ETC) 
UNSPECIFIED 

POP THE RETURN ADDRESS INTO THE PC 



OATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE 1 



PAGE ?5 

71 4'. 

715'. 

716; 
717'. 

718'. 

7191 
7S0l 
78i; 
7?2l 

783'. 
724'. 
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7251 
726. 
7271 
728. 
729^ 
730. 
7311 
732, 
733, 
734, 
735, 
736, 
737, 
738, 
739, 
740, 
7411 
7421 
743, 
744; 

745I 



746; 
747*. 
7481 



0a05i5L 

00Rf5«6L 
»0i05Sl7L 
>f(?l05lf1L 
>05i0511U 

0«30512L 
i«05l3L 
0a05l4U 
000515U 
000516U 
0ei05l7L 
0i0520L 
00!?I521L 
i00522L 
0W0523L 
000524L 
00i525L 
000526L 
000527L 
000530L 
0005311 



01010001 
00110111 
01011001 
01010001 

ii0f?iin 

00110001 

90110001 
00110111 
00110001 
00110001 
00110001 
01010001 
00110101 
00110111 
00110111 

11001HP" 

11010100 
11000111 
00110001 
00110111 
00110U1 



00001001 
00000001 

llllUU 

u u u u 

UllUU 
U«0100l 

11 101000 
00001101 
10001001 

1010! 000 
11101010 

11000000 
11001011 
00001101 
e!l(?l0011l 

HllllU 

10101010 
00001100 

e»0110U0 

10001100 
00000100 



i00532L 01000101 10000000 
000533L 11010010 11000110 



000534L 



000534L 
000535L 
000536L 
iGI0537L 
000540L 
000541L 
0l?t0542L 
000543L 



00110001 
01010101 

01010011 
00110111 
00U0001 
00110111 

00110001 

01010101 



119111011 

10000000 

P»0UU1«5 

11000000 
11101010 
01000111 

ll«lUi0 
Pilillltl 



LOPI LIMPpPCL 

BRCX POPST0,,SYSRET0 

SySRETl's DLfiX PC2MR,,0MAR 



OUOX MR2PC 

LOX SP2MRH 

LOTI 0300 

OOP 8P2«RL»N0 

STB OMAR#SMR 

MWAJT NOOP,MEMPF0 



LDPP PSWO,M0R,H0DW 



f 

TSTIT ,SWALBT 

BRA BETAt,FZ 

, BRA ALPHAL 

* 

ALPHAL 

. 19,65 cm 030) ALPHAL 

, (100 030) ALPHAL 

I 27, ?0 (062 030) SYSRET 



GET THE RETURN AO0RESS INTO THE P.C, 
OFF PAGE rtlTH SPECIAL RETURN 

CORRECT FOR IHAR IN FETCH CODE 



GET THE PSW 

TO BE LOADED 

FROM THE SYSTEM SAVE AREA 



GET NEW PSW & SET TT EVEN IF USER HQPEi 



MOD>« MAY CHANGE BASE EN/OIS BIT 

BUT DO IT NOW FOR BASED STACK AREA?? 

NO PROBLEM, IF PROTECTED FIRST POP/PUSH 

WOULD FAIL ANYWAY 

WHICH WAY TO GO? 

TO BETA 

TD ALPHA 



LOAO REGISTERS FROM ALPHA SAVE AREA 
UNSPECIflED 

ONLY IF IN ALPHA MODE 



MAR *m SPH, (SPIL .AND, 300) ,0R. SESAVAF 
T <• PSW .AND, ml - SWRPT » SWALBT 
MOOUOD 
, 14,70 TO FETCH (NO FETCH) 

OOTIP ,ND, 0200, SPIL SET IT ON 128 BYTE BOUNDARY 

DOPI MAROL, OR, SESAVAF, AND, 0177 ONLY 7 BITS OF INTEREST 

LOX SP2MRH,SMR 

OOTIP ,ND,''1»SWRPT-SWALBT,PSWI RESET REPEAT FLAG AND SET ALPHA 

BRA MODLOD 



OATAPOINT CONFIOENTIAL INFORMATION f SEE PAGE I 
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749, 

7S0' 
7B\, 
752. 
753^ 

755, 
756, 
757J 

758. 
759, 
76<?. 
761'. 



7621 
7631 
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7641 

765*. 

7S6l 



000544L 



* 
MODLOO 

LOAD USERS FLAGS AND REGISTERS 
NOTE: IF MACRO LEVEL PLAYS WJTH FLAG BYTE, IT BETTER 00 IT CORRECTLY 

Q tjJ i^m T 

LUF «• (MOR) ♦ CMDR] 
MAR <<• MAR "p 1 
MOOLOP 



8i0544L 

0»0546L 
00e!547L 

00?!5S1.L 
0PI0552L 
f<?8553L 
0ffl0554L 
800555L 
000556L 



i0H0Ul 

U0i0ii0 

11000JU 

001l0tll 

etfiiaiii 
iiiiiiu 



i0f0Uii 

10U«fl0 
li8(»U0!8l 

i7>0^0niS0 

00111)110 
00110110 
00001101 
01000111 
00000110 
01100001 



LOPT PSWO 

CCLR 

MWAIT ,MEMPF» 

LOPT MOOW 

OOTPP ,AC,MOR,MOR 



STB 


0MAR,SMR 


STB 
BRA 


LUF 
MOOLOP 



LOAD STATUS WORD 

SET USER FLAGS 
POSITION CORRECTLY 

AND DO THE REGISTER LOAD 
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769. 

77i; 

77?. 
773' 
774- 
775. 
776^ 
777. 
778' 
779, 
780, 
781, 
782, 
783, 
784, 
785, 
786j 
787. 



PROC/TXT 
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78JUL20 U:44 



788. 

789'. 

7901 
791. 



792, 
793. 



794. 

795'. 

796i 
797, 
798, 
799. 

8«0* 

8«3. 

8«)4* 
805. 



8«6l 



0005571 



0P!i557L 

00«56t^L 
i0056JL 
a?ii562l, 
0e«ia563L 
0i0564L 
000565L 
80056fiL 
000567L 
(85»057!^L 
0«i571L 
000572L 
0S0573L 
090574L 
0005751, 
»«!I0576L 
SIW0577L 
0006001. 
0C5060JI. 
000fi02L 
000603L 
000804L 
000605L 
000806L 
000607L 
000619IL 
0006UU 
000612L 
000813L 
0«06i4U 
000815L 
000816L 
000617L 

0000201. 

000821L 



11011000 

00110031 

00U0001 

00U01U 
01010001 
001101U 
11010100 

U000UI 

00110001 
00110111 
00110111 
01101111 
11010100 

11000111 
00110001 
00110111 
01110001 
00U0111 
00110111 
00110111 
00110001 
11010100 
11000111 
00110111 
0eHl0111 
11011000 
11010100 
11000111 
00110111 
00U0001 

01101111 

00 U 0001 

01101111 

00110001 
00110001 



01100100 
11001011 
11101010 

01000111 

9!00li000 
«0000001 
10001010 
00001100 
00110110 
00001100 

01000111 

llllP!010 
10000100 
08001100 
00110110 
11100000 
11110010 
11000000 
00001100 
«000100l 

110111U 
01111011 
00001100 
0000U01 
00100001 
01111101 
01110110 

00001100 
00001101 
10011000 

11110010 

10110000 
11110001 
11001011 
11101010 



* 

REGSt 
19,40 

16,95 



RFG8LP 



( 



055) REGS 



fill 0555 
(IMP 055) 



REGL 
REGL 



IF IMP MOT ZERO THEN REGL 
ELSE IMP <• 8 

MAR <• (SP, SP+1) + I 
REPEAT IMP <m IMP - I 
MAR <» MAR - 1 
(MAR) «• IMP 
UNTIL IMP ZERO 
(SPt SP*13 <f MAR • I 
FETCHW 



BRA 
OLOX 


REGL,F#,IZ 
8P2MR,,SMR 


LOPI 


LIMP, IMPS 


MWAIT 


,MEMPF0 


LOTP 
STB 


MOR 
IMARjSMR 


LORT 
MWAIT 


TEMPL 
,MEMPF0 


LOPP 


MAROH,MOR 


LOPR 


MAROL#TEMPL 


STB 
STB 
LOTP 
MWAIT 


IMAR 
DIMP 
IMPI 
,MEMPF0 


STB 
LOPT 
BRA 
M»<AIT 


OMAR 

MOW 

REGSLPfF#,IZ 

|MCMPF0 


STB 
OLORP 


OMAR 
TEMP,MARI 



REGISTER SAVE 

REGISTER LOAD 

REGISTER LOAD UNSPECIFIED 



OLOX SP2MR 



00 REGISTER LOAD NOT SAVEl 
GET TOP ENTRY ON THE STACK 



INITIALIZE COUNTER 



SET LSB 

HOLD IT 

GET MSB 

PUT BOTH IN THE MAR 

(EXTRA CODE HAKES IT FASTER) 

COUNT DOWN 

GET NEXT REGISTER 



POINT TO THE NEXT SAVE LOCN, 
AND OUTPUT THE REGISTER 
CONTINUE THROUGH LOOP TILL DONE 



(EXTRA CODE MAKES IT FASTER) 
MOVE THE MAR OUT OF THE WAV 



PUT STACK POINTER THERE 



OATAPDINT CONFIDENTIAL INFORHATTON - SEE PAGE 1 
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PROC/TXT 



8(?t7 



8018: 
809. 



8i0, 
8U. 
812. 

8131 



e!»06a2L 

000623L 
000624L 
$m$2Sl 

i0«626L 
0006271. 

>0it063lL 

>0i0632t 



0011S5J11 
»1U0001 
It0i0iap' 

00U0Ut 

0i0iie)i?ii 
ii«^iiii 



llll!»010 
»010«05tl 

P11101010 

0ii0Uia 
0ii0«a«i 

U 11 1 1 1 1 
UllllU 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJ8 " 
, REGISTER SAVE AND RESTORE 



78JUL20 UM4 



LOPR MOWiTEMPL 

LDTR TEHPH 

MWAIT ,MEMPF0 

STB IMAR 

LDPT MOW 

FTCHA0W BRAX FETCHW 



SAVE NEW TOP OF STACK ENTRY USB 
GET SET FOR MSB 



POINT TO THE MSB 
SAVE IT 



OATAPOINT CDNFIDENTTAL TNFORMATTQN • SEE PAGE I 



PASE 29 



$\4* 
815, 
816, 
817. 
818. 
819;. 
880. 
82lJ 

823. 
8?4. 
625, 
8261 
887, 
828. 



PROC/TXT 



MICRO-PROCesSPR EMULATION SUPPOPT CODE • HJS * 
, REGISTER SAVE AND RESTORE 



7njlil2^ UM4 



8291 



8301 
831. 

832* 
8331 



834, 
835, 
836. 



837. 



0i?i0633L 



0006331 
000634L 
000635L 
0006361 
0«»0637L 
000640L 
0006411, 
09I0642L 
000643L 
000644U 
000645L 

000646L 
0006471. 

>000650U 
>00065IL 



00110001 

00U0001 

00110111 
01010001 
00U0U1 

00110111 
11010100 
11000111 
00110001 
00110111 
00110111 
00110111 
11011000 
0101100$ 

11001111 



♦ 
RESL 

16,95 till 05S3 
(IMP 0555 



11000110 

11100101 
01000111 
00010000 
00000001 
00001001 
01011110 

00001 100 
00110110 

00001 101 
01000111 
10001111 
01^11111 
llUUll 

H 1 1 1 1 1 1 



REGL 
REGL 



REGISTER LOAD 

REGISTER LOAD UNSPECIFIED 



MAR ««» HL 



MOOLODI 



IMP <■ 8 

REPEAT IMP <« IMP • 1 
IMP <m (HAR) 
MAR <m MAR « 1 

UNTIL IMP ZERO 

FETCHW 

DLOX HL2MR,,SMR 



MODLOP LOPI LIMP, IMPS 

REGLLP STB OTMP 

MWAIT ,MEMPF0 

LOTP MOR 

STB OMAR,SMR 

LDPT IMPO 

BRA RE5LLP»F»»n 

BRAX FETCHW 



INIT HL TO MAR AND GET FIRST REG (X5 

INIT COUNTER 
COUNT DOWN 

GET DATA AND START NEXT READ FASTI 



SAVE THE DATA IN ITS REGISTER 
LOOP FOR THE FULL COUNT 



DATAPOINT CONFIDENTIAL INFORMATION • SEE PA$E 1 
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PROC/TXT 



MICROfPRDCESSOR EMULATION SUPPORT CDOf - HJS • 
, SECTOR TABLE LOAD 



78JUL20 11M4 



840' 

i4l 

842^ 

843; 

844' 

845. 

8461 

847. 

8481 

849^ 

850. 

85i; 

852. 

853. 

8541 

855, 

856, 

8571 

858y 

859, 
860* 
861. 

862* 
8631 
864, 
885, 
866. 



867 
868 
888 
868 
868 
869 
870 
871 
872 
873 



8741 
875, 
8761 
8771 
8781 

8791 

880, 
88i, 
8821 



000652L 



000652L 
0i0653L 
000654L 

0ie)655L 
000656L 

000657L 
a00660L 
0»066tL 

000662L 
a00663L 
000664L 
000665L 
000666L 
0et0667L 

000670L 
000671L 
000672L 
000673L 

000674L 
00f675L 
000676L 
000677L 
00070e!L 

000701L 
00070gL 
000703L 



00U0001 
01000101 
11000010 

01010101 

11010011 



11011100 

000001?!0 
00110000 
(»{|10iafl0 
01000111 



081110001 11010010 
01010101 00000111 
01101111 11110010 



00010U1 
00010H1 
00010111 
0001011! 
01010011 
11011111 



10100010 

ie»i000li 

181180010 

Iii0i0i0 

0i001000 
01000011 



01101111 11110010 

fill0«eii 11010010 

01010101 00001111 
11010011 00000101 



11011001 

0U01111 

0011000! 
01010101 
01110010 



00111110 
11110001 
11011111 
11110000 
00110001 



01101111 11110001 

mii9m% U010110 

01110010 00110010 



* 

STL8 

, ( 0773 STL 

, 7,90 ♦ C * 8,5 ♦ 0,55 IF C > 8 

, + 5,05 IF SERVICE 

• 

t 



(022 


077) 


STLOA 


an 


077) 


STL09 


f062 


fB??) 


STLOC 


(113 


077) 


STLOD 


(174 


077) 


STLOE 



, 10,25 + C ♦ 2,5 + 0.55 IF C 
♦ 5,05 IF SERVICE 



> 8 



STLRPTD 



8TLZR0 



(IMP 077) 



LOAD THE SECTOR TABLE 
(OR 4,4S IF C ■ 0) 



LOAD SECTOR TABLE STARTING FROM 

LOAD SECTOR TABLE STARTING PROM 

LOAD SECTOR TABLE STARTING FROM 

LOAD SECTOR TABLE STARTING FROM 

LOAD SECTOR TABLE STARTING FROM 

(IN ABOVE, HIGH 4 BITS SELECTl) 

(OR 6,45 IF C « 0) 



UNSPECIFIED 



NOTEf DOES NOT CHANGE HL OR CREGISTERS 

NOTEl IN STLO'C* LOW 4 BITS COUNTER & HIGH 4 BITS OFFSITl 



T8TIP ,SWUSER,PSCiI 

BRA IVIOLS,FZ 

TSTIT ND,SWRPT,,,TW 

BRA STLNRPT.TZ 

OORIP TEMP2,ND,07#URI+URC 



RPT 

SHIFT 

SHIFT 

SHIFT 

SHIFT 

OOTI 

BRA 

8TLNRPT LORT 
TSTIP 



BRA 

BRA 

LDRT 

OOTIP 



LORT 
DOPRP 



4 

SL 
SL 
SL 
SL 

,OR»0ia 

STLRPTD 

TEMP2 
,017,UR|+URC,TW 

FTCHIAB,TZ 

8TLZR0,T#,IZ 

TEMPI 

,NO,0360|IMPI 



DOTR ,AC»TEMP1,,C0 



TEMPI 



ONLY IF PRIVED 



ASSUME WILL BE ZERO, NOT f?EPFATgD 
WAS NOT REPEATED 

REPEATED, GET THE HL (MAR) BIAS AND 



THE POINTER BIAS AND COUNT FOR THE 
THE POINTER BIAS AND COUNT FOR THg 
THE POINTER BIAS AND COUNT FOR THE 
THE POINTER BIAS AND COUNT FOR THE 
FINAL EH5HT STL LOADS 



REGULAR HL (MAR) NEEOS NO BIAS 
GET THE COUNT OF THE STEPS TO DQ 

IF ZERO, WAS NOTHING TO 50, SO, THE FNDi 

00 STANDARD STL 

SAVE AWAV 

IMP STL STARTS STL WITH OFFSET 

COMBINE GIVEN OFFSET WITH BIAS 

SAVE THE POINTER/COUNTER AS GENERATED 



MAROL,AC,TEMP2,URI+URL,C0 BIAS TABLE ADDRESS (IF NEEDED) 



OATAPDINT CONFIDENTIAI INFORMATION • SEE PAGE i 
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8i3l 



884 „ 
8851 
886. 
B§7* 
888, 
889, 
890. 



8911 
892. 



893. 

894'. 

8951 
8961 



8971 
8981 



8991 

900- 

9«l. 
9021 
903* 
904, 
905, 
906, 

9071 
9081 
909. 

9101 
911. 

9181 

9131 
914, 
9151 

916^ 
917. 

918* 
9191 



PROC/TXT 



MICRO-PRDCESSOR EMULATION SUPPORT CODE ^ HJ8 p 
, SECTOR TABLE LOAD 



78JUL20 1U44 



0«0704L 
0007«5L 
000706L 
000707L 
000710L 
000711L 



00110111 

00U0001 
01101111 

00110111 
00110111 



11000000 
11010101 
11110010 
11100000 

01000111 
10000101 



0007lgL 01U0001 11U0001 



000713L 
00i7l4L 
000715L 
000716L 
000717L 
000720L 
000721L 
000722L 
000723L 
000724L 
000725L 
000726L 
000727L 
00073iL 
000731L 
000732L 
000733L 
000734L 
000735L 



000736L 
000737L 
000740L 
000741L 



000742L 
000743L 

O00744L 
000745L 
000746L 
000747L 
000750L 
000751L 
000752L 
000753L 
000754L 
>000755L 
»000756L 



11010101" 

11010111 
00110111 
01010001 
00110111 

00110001 
01010101 
00110111 
00110001 
0W110111 
00110001 
00110111 
00110111 
00U0001 
01 110001 
01010010 
01101111 
01000101 
11010010 



01000101 
11010011 
00110001 
11010011 



00110100 
00011101 

11100000 

00000010 
00000100 
00110110 
11111101 
00000101 
11011100 
00000100 

11100101 

0000U00 
01000111 
10100101 
10110001 
00001111 
11110001 
00000111 
00110100 



00001111 

00011101 

00110000 
00110101 



11010100 00011101 
11010111 00011011 



01110001 
00110111 
01010001 
00110111 
00110111 
01011001 
01110001 
01000101 
11000011 
01011001 
11001111 



11110010 
10000101 
11110000 
11100000 
00000101 
11111101 
11110001 
00001111 
01110010 
1 I 1 1 1 I 1 1 
llllllU 



STLAGN 
STLOOP 



LORP TEMP2,URI*URH 

OOP MAROH,IT 

STB SHR 

LOPT URO+URH 

LDTR TEMPI 

MWAIT .STLOONE 

LOPT MAROH 

LOPI MOOWiSWBASD 

OOPIP STW,NO,0376,HDR 

LDPP MOO¥,PSWI 



LOX 
STB 



LDPR 

LOPI 

LOPT 
BPSX 
T8TIR 

BRA 
BRAX 



HL2MRH 
IMARfSMR 



SAVE AfelAV U«H SO CAN SE RESTORED 

GET NEXT CFIRST) TABLE ENTRY 

IN CASE TABLE CROSSES PAGE BOUNDARY 

GET THE INITIAL VIRTUAL ADDRESS 

RESTORE REGS & SET VECTOR FIRST 

LOAD VIRTUAL ADDRESS FROM TEHP 
DISABLE BASING (AND I MS INTERRUPTS) 

SET PHYSICAL SECTOR « IN VIRTUAL LOCN, 

RESTORE BASING CI MS INT, 1 INST, DELAY) 

RESTORE MARH FROM H SAVE AREA 
GET NEXT TABLE ENTRY 



LDX MR2HLH SAVE MARH IN H 

DORIR TEMPI. AC, 017, TEMPI, CC INC VIRTUAL SECTOR # & DECR COUNT 



TSTIT ,07 

BRA STLOOP, PZ 



TSTIT ,017 

BRA STLDONE,TZ 

TSTPT FI,8RVREQ 

BRA STLAGN, TZ 



STLDONE MWAIT ,$♦! 



AT SPLIT POINT? 

NOi CONTINUE 

LOOPING JUMP IS DURING MEMORY REAO 

THIS MAKES EXEC FASTER, 

REALLY FINISHED? 

YES, CLEANUP AND END 

NO, ANY SERVICE TO DO? 

NO, THEN DO SECOND HALF NQW 

REPEATEOI WILL 00 SERVICE BEFORE SECOND 

PART BUT 00 CLEANUP FIRST 

RESTORE BEFORE MEMPF 

BUT NOTEI MAR MSB WILL BECOME INCORRECT 
RESTORE HpREG 



UR04'URH,TEMP2 

MAROH, SYSR0M>8, AND, 0360 *♦ FORCE LAST ENTRY TO 

ACCESS PROTECT AND WRITE PROTECT 

REALLY FINISHED? 



STW 

RIND 

,017, TEMPI 



RINO,TZ 
SRVRPT 



YES, RESET REPEAT FLAG 

NO, DO IT AS REPEATED INST, 

feOTH RIND « SRVRPT INDIRECT TO HEMPF) 



DATAPOINT C0NFII5ENTIAI. INFORMATION * SEE PAGE I 
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9?2, 



PROC/TXT 



MICRO-PPOCESSOS EMULATION SUPPORT CODE - HJS - 
SYSTAT INSTRUCTION (157 OP-CODE) 



78JUL20 11144 



923, 0i«?757L 
924- 

925, 
9261 
927. 
928' 
929. 
93(8, 
931, 
932, 
933. 
9341 
935, 
936, 
937, 
938, 
939, 
940 

941; 

942, 

943; 
944' 
945. 
9461 

947* 
948. 
9491 
950. 
951* 
952, 
953, 
954, 
955. 

956*. 



0007571 
0?»0768t 
00i761U 
000762L 
000763L 
800764L 

fi0766l 
(8»0767l 
0i?l77(?L 
0^07711 
00I8772L 
»mB772l 
»0i0773t 
0<"Pl774L 
0i?l775L 
$m776l 
0if777l 



1100 
0011 

0101 
0011 
0011 
1101 

0011 
0011 
1101 
0101 
0011 



1001 
0111 
0001 
0111 
0001 
I0fl 
0111 
0001 
1001 
0001 
0111 



01011001 
11001111 
1 11 U U 1 
lUllllI 
UUllU 

Ilium 



00101110 

00001001 
00000000 
10000010 
11011100 
00000110 
00001001 
01010001 
00000110 
00000000 
10000001 

11 mill 
mum 
mum 
mum 
mum 
mum 



VSTATi 
10,25 

5^35 
5,75 

S,95 
5.95 
5,95 
5,95 
5,95 
5.95 



SVSTNO 
FTCMIA8 



t 

(lU 

(062 

(113 

(174 

CU5 

(176 

(U7 

(022 

CASE 
0f 
II 
2t 



157) 
157) 
157) 
157) 
157) 
157) 
157) 
157) 
157) 



UDOP 

SVSTATl 

SY8TAT2 

SySTAT3 

SYSTAT4 

SYSTAT5 

SY8TAT6 

8YSTAT7 

SYSTAT8 



IMP OF 
UDOP? 

B <■ Psw; 

8 <B SNIOf 



3».8tB «■ 0f 
ENO CASE 
C «« 
FETCHI 

BRA UnOP,T#,n 
STB OIHP 
LOPI URO+URC,0 

tOTP P8WI 

BRA 8YSTND,T#,IZ 

STS OIMP 

LOTP SNIP 

IRA SYSTND,T*,IZ 

TCLR 

L0PT URO+URB 

BRAX FETCHI 

TA8PAGE PROCL 



UNDEFINED QPwCOOE 






PROCESSOR STATUS WORD 






SELECTABLE NODE 1,0, 






SYSTEM STATUS (UNUSED 


■1 


0) 


SYSTEM STATUS (UNUSED 


m 


0) 


SYSTEM STATUS (UNUSED 


m 


0) 


SYSTEM STATUS (UNUSED 


m 


0) 


SYSTEM STATUS (UNUSED 


m 


0) 


SYSTEM STATUS (UNUSED 


m 


0) 



157 ALONE IS UNDEFINED 

CHECK m 

WHATEVER ELSE» C»0 
(ASSUME I) 
CHECK 062 

WILl BE 113 * 022 

(FINISHED ALPHA/BETA THAT DID NOTHING) 



OATAPOINT CONFIRENTIAU INFORMATION " SEE PAGE I 



( 



PAGE 33 



PROC/TXT 



MICPO»PRDCeSSO» EMULATION SUPPORT CODE - HJS • 
, BLOCK TRANSFER ANR CONVERT 



78JUL2i XXIAA 



K 

( 

( 



959' 
9601 

962; 
963. 
964' 
9651 
966. 
967^ 
968^ 
969, 

971^ 

972; 
973, 
974, 
975; 
976, 
9771 
978, 
979^ 
980- 

981, 
98«, 
983. 
9841 
985- 
9861 
987, 
988, 
989, 
990, 
991, 
992, 
993, 
994. 
995I 
996. 
9971 
998, 
999, 
I0fll0. 



10flll 
1092, 
1003. 



10041 

1005^ 
1006. 



001000L 



* 
8TJ 



001<^00L 
001001L 
00l0i2L 
001003L 
001004L 
0W1005L 
00100SL 
001007L 
0010liL 
0010UL 
i01012L 
001013L 
001014L 



11001{»0! 

1100101 J 

00110001 
00U0001 

00U0U1 
00010UI 
0011 0001 
11000100 
H 1 U 1 
00U0ffll0 
00110111 

00110111 
00110001 



( 021) BT BLOCK TRANSFER 

2.25 ♦ N * 5,55 - N * 0,15 / OOOSTEP • 0,5 IF MATCH 

(111 0213 BTR BLOCK TRANSFER REVERSE 

4,25 ♦ N * 5,75 - N • 0,15 / OOOSTEP " 0,5 IF MATCH 

(062 021) BCV BLOCK CONVERT 

4,25 + N * 7,35 - N * 0,15 / OOOSTEP * 0,5 IF MATCH 



flOD 021) BTR 
(leV 021) BCV 



BTR UNSPECIFIED 
BCV UNSPECIFIED 



NOTE! NONE OF THESE CHANGE THE CONDITION FLAGS 



IF IMP ZERO THEN 8TX 

ELSE IF IMP 000 THEN BTR 

ELSE MARL <- A <- L ♦ tOE) 
HARM «f. H ♦ C 
TEMPI «• 
8TCVT 

BTXI MAR <m HL 

HL «» NL ♦ I 

TEMPI *m A 
BTCVTi TEMPI <• (DE) <* TEMPI ♦ (MAR) 

OE <-» OE ♦ 1 

BTENO 



BTRI MAR <• HL 

HL <• HL ■• 1 

TEMPI <m A 

TEMPI <• CDE) <• TEMPI ♦ (MAR) 

OE <• DE - 1 

BTENOi IF (TEMPI <•■ B) ZERO ANO CARRV THEN RIN256 
ELSE RIN256 



SET CARRY ON OVERFLOW 



11101110 
U010110 
11000100 

H1000U 
01000111 

10110010 

H010110 
HI 11000 
00001i«il 
W0110110 
11000000 
10000000 
11010101 



BRA eTX,T«»,IZ 
BRA 8TR,T*,I0 
OLOX 0E2MR,,SMR 



CCLR 

LOTP URI+URL 

MWAIT ,MEMPF1 

OOPP MARQL»ACfMDR 



LDPT 
LOTP 



URO+URA 
URI+URH 



BT C021) 

BTR (HI 0213 

BCV (062 0213 



ADO OATA AT OE TO TABLE POINTER IN HL 



A <m MAR <* L ♦ (DE) 

STORE IN A SO CAN FIND STOP POINT 
ADO IN CARRY ALSO 



DATAPOIMT CONFIOENTIAU INFORMATION - SEE PAGE I 



PAGE 34 



PROC/TXT 



micro-pprocessor emulation support code - HJS # 

, BLOCK TRANSFER ANf) CONVERT 



78JULS0 US44 



im?. 

1008. 
1009. 
1010. 
10UJ 
1012. 



1013. 



1014, 
1015, 
1016. 

1017*. 

1018'. 



1019. 
1020*. 



1021, 

1022J 
1023, 



1094'. 
1025'. 



102©; 

1027i 
10281 
1029'. 



1030* 

1031. 



001015L 
00101SL 
001017L 
001020L 

001021L 
001022L 
i01023L 
001024L 
0il025L 
001026L 
001027L 
001030U 
001031L 
001i32L 
001033L 
001034L 
001035U 
001036L 
001037L 
fl0l040L 
001041L 
00i042L 
001043L 

001045U 
0il046L 
i«1047L 
001050L 

P01051L 
001052L 
0010S3L 
001054L 
001055L 
0010S6L 
001057L 
001060L 
001061L 
001062U 
001063L 
001064U 
001065L 
i0106«L 
001067L 
001070L 
001071L 
001072L 
001073L 
i0l074L 
001075L 
001076L 



00U0U0 
00110111 

01010001 

H001U1 

00U0001 
00U0001 

00U0111 

00110001 
00010110 
00U01U 
00110001 
00110110 
00110001 
01101111 
11000100 

11010111 

00110001 

00110001 
00110001 
01110010 
00110111 
81101111 
00110001 
00010110 
00110111 
00110001 
00U0110 

11001111 

00110001 
00110001 

80110111 

00010111 
00110001 
01010100 
00110111 
00110001 
01010100 
00110111 
00110001 
01101111 
11000100 
11010U1 
00U0001 
00U0001 
00110001 
01110010 
00110111 

01101111 

00110001 
01010100 



11100000 
01000111 
00000000 
11100101 

11000110 
11100101 
01000111 
10010000 

01U0010 

10000110 
10110000 
10000101 
11010000 

11110001 

11100100 
00001001 
11000100 
11100011 
00110110 
00110001 
00100001 

11110001 
10010000 
01110010 
10000100 
10110000 
100000U 

1011U00 

11000110 
11100101 

01000111 

10110010 
10010000 
00000001 
10000110 
10110000 
00000000 
10000101 
U010000 

11U0001 
11001010 
00001001 
11000100 

11100011 
00U0U0 
00110001 
00100001 
10110001 
10010000 
00000001 



aTx 



8TCVT 



* 
STR 



OOP MAROHflT 

STB SMR 

TCLR 

BRA 8TCVT 

OLOX HL2MR,,8MR 



OADDP UROi-URiMARI 



LDTP URI+URA 

LDRT TEMPI 

MhlAIT ,MEMPF1 

OLDX OEgMR 

DOPRP MOW, AC, TEMPI, MDR,C0 



LORT TEMPI 

OAODP URO*UOE,HARI 



INDIRECT THROUGH THIS FOR TABLE ENTRY 
NO AwREG OFFSETS 



SET OATA AT HL TO SE MOVED 



INCREMENT HL FOR 8T 



SAVE THE A-REG OFFSET tZERO FOR BCV) 

POINT TO WHERE TO STORE RESULT 
STORE OATA IN C0E3 AND IN TEMPJ 

INCREMENT DE FOR 8T & BCV 



iRA 8TEN0 
OlDX HL2MR,,SMR 



CCLR 

ODECP URO+UR,MARI 



GET OATA AT HL TO BE MOVED 



DECREMENT HL FOR iTR 



LDRP TEMPI, URI-MJRA 

MWAIT ,MEMPF1 

OLOX 0E2MR 

OOPRP MOW, AC, TEMPI, MDR,C0 



LORT TEMPI, ,CC 
OOECP URO+UOE,MARI 



LOAD UP THE Ai*REG OFFSET 



SET RESULTANT DATA 



STORE DATA IN tOE) 
BACKUP OE FOR BTR 



DATAPOINT CONFIOENTIAU INFORMATION - SSE PAGE I 
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PROC/TXT 



MICR0»PR0CESSOR EMULATION SUPPORT CODE «• HJS w 
, BLOCK TRANSFER AND CONVERT 



78JUL80 11M4 



1092. 
10331 
1034. 
1035. 

1036*. 
1037' 

1036, 
1039, 

I04a, 



aauaeiL 

801101L 
0!^U»2L 



S!«U03L 
001104L 

0eiU0SL 



P»aU01ll 

01010100 

001101U 



01110010 

11000000 
11000011 



10000100 
10110000 
00000000 
10000011 



11010001 
00000001 
10110111 
01110010 



• BT " 3,50» BTR • 3,70, BCV «» 5,30 



9TEND 



TSTRP AC, TEMPI, URI+UR8,C0 



001107L 00010111 10110010 



BRA 
BRA 
BRA 

CCLR 



RINg56,FC 

RlNn,TZ 

RtN2S6 



AT THE ENDPOINT? 

NO, WANT CARRY TRUE S ZERO TRUE 

VES, END NOWl 

NOi 

NO, REPEAT 256 TIMES (OR LESS) 

** ONLV CARRY SET RIN256 CASE *♦ 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 
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t043' 
1044, 
104SJ 
1046. 
1047, 
1048, 
10491 
1050, 
10S1, 
1052, 
1053, 
1054, 
1855, 
1056, 



1057, 
1058, 
1059, 
1060. 
106i[. 
10621 
1063^ 
1064, 
1065, 
1066, 
1367; 
1068, 
1069. 
1070* 
1071, 
1072. 

1073' 
1074. 

1075'. 

1076* 
1077; 



PROC/TXT 



001110L. 



0011101, 
0011UU 
001118L 
0011131 
001U4L 
001115U 



0011161 



001116L 
001 11 7U 
001120L 
001121L 
00U22L 
001123U 



00110001 
01010100 
00110111 

11000011 
01000101 

11000010 



00110001 
11000010 
11000100 
11010111 
00111001 
10101U1 



»001124L 01011001 
>001t25L 1100U1! 



MICRO-PPDCESSOR EMUIATION SUPPORT CODE • HJS • 
, REPEATED INSTRUCTIONS, REPEAT CONTROL SECTION 



78JUL20 11J44 



RIN256 1 

ODD * 1,45, RPT - 1.60, SRV * 1.35, END • 3.85 

WARNING, CARRY MUST BE CLEAR ON ENTRY 

BLOCK REPEATED INSTRUCTIONS (THOSE THAT COUNT C THROUGH 256 MAX STEPS) 

DOES NOT CHANGE FLAGS 



URC «w URC • 1 
IF ODD THEN RINDO 
IF ZERO THEN RIND 
ELSE RIN8T 



EVERY OTHER STEP HAS NO SERVICE 



U010010 
00000001 
10000010 
01110010 
00000001 
10101111 



OOPIP UR0+URC,8B,1,URI-|.URC IF ZERO, FINISHED 



BRA 

TSTIT 

BRA 



RIND,TZ 
fl 

RINDO, FZ 



DO THEM IN PAIRS SO CAN'T INTERRUPT 

DURING DOUBLE BYTE MOVE 

ICAN USE BT IN DISPLAY POINTERS MOVESt 



INSTI 
SRV m 0.65, RPT - 0190 



RINDO! 



LOOP THROUGH REPEATED INSTRUCTIONS, SET THE REPEAT MODE AND DO 
SERVICE REQUEST IF NEEDEO ELSE RE«EXECUTE THE INSTRUCTION, 

IF SRVREQ NOT ZERO THEN SRVRPT 
ELSE IDCOD CIREG) 



00110000 

10101011 
10101111 

00001001 
00110100 
00110011 

UUllU 
UllllU 



RINDO 



TSTPT FI,8RVRE0 

BRA RINRPT,FZ 

MWAIT ,MEMPF1 

BRPX IDCOO 



DO SERVICE IF NEEDED 



GO 00 OPCODE AGAIN 



RINRPT 8RAX SRVRPT 



YES, 00 ITi 



OATAPOIWT CONPIOENTtAL INFORMATION m SEE PAGE i 
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080' 

082, 

083 

084. 

085' 

080. 

0871 

088. 

080^ 



PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT CODE •» HJS • 
, iLOCK COMPARE 



78JULa0 11U4 



09lJ 
092, 
093, 
094, 
095, 
096, 
097, 
098. 
099' 
100, 
101. 



1102. 

1103*. 
1104*. 

1105'. 
1106'. 



1107* 

U08. 

1109'. 
1110* 



0011261 



001126L 
a01127U 
i0ll30L 
001131L 
0011321 
00U33L 
0011341. 
001135L 
00U36L 
001137L 
001140L 
00U41L 
0011421 
001143L 
001144L 
00114SU 
00114fiU 
001147L 
0011501. 
00U5tl, 
00U52L 
001153L 
001154L 
001155L 
001156L 
001157L 
0011601 
0011611 



11001000 

00110001 

00110001 
00110111 

00110001 
00010110 

00110UI 

00110001 
00110110 
11000100 
11010111 
00110001 

01101111 

00110001 
00110001 
00110111 
00110001 
00010110 
00110111 
00110001 
00110110 
01110001 
U000100 

U 1 1 1 1 

00110100 
00110111 
11000011 
11001111 



10001101 
U000100 

11100011 
01000111 

10010000 
01110010 
10000100 
10110000 
100000U 
10100000 
00001001 
00110110 
11110001 
11000110 
11100101 
01000111 

10010000 
01110010 
10000110 
10110000 
10000101 
10110001 
10010011 
00001001 
00110110 
00000110 
10110111 
01110010 



icpi 

f 041) iCP BLOCK COMPARE 

2,15 ♦ N * 5,35 - 0,15 * H / OOOSTEP f 0,5 IF MATCH 



, Mil 040 DFAC 
4,25 ♦ C ♦ 6,95 

flOO 041) OFAC 
4',25 ♦ C ♦ 6,85 

£062 041) OFSfi 
CIEV 041) DFSB 

IF IMP NOT ZERO THEN DFOP 

ELSE LUF <•• T «i. (OE) • fHL) 
OE <* OE ♦ 1 
HL <• HL ♦ 1 

IF T ZERO THEN RIN256 
ELSE RINO 



DECIMAL FIELO ADO 
OFAC UNSPECIFIED 



DECIMAL FIELD SUBTRACT 
DFSB UNSPECIFIED 



BRA OFOP,F#»n 
OLOX DE2MR,,SMR 



DADOP URO+UOEfMARI 



GO TO DECIMAL STUFF 



GET DATA AND UPDATE OE 



MWAIT jMgMpFl 

LORP TEMPI, MOR 

DLDX HLaMR,,8MR 

DADDP URO+UR,MARI 



LOTR TEMPI, CC 
MWAIT ,MEMPF1 

DOPP LUF,SB,MDR 



GET DATA AND UPDATE HL 



BRA 
BRA 



RINg56,TZ 
RIND 



GET OE DATA 



SUBTRACT HL DATA AND SET COMPARE FLAGS 

CONTINUE IF A HATCH (CARRY ZERO TOOi) 
END IF DATA DIFFERS 
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1115, 
1116' 
1117. 
1118, 
1119, 
1120^ 
1121. 
11221 
1123, 
1124. 
11251 
1126. 
11271 
1128, 
1129, 
1130, 
1131, 
1132, 
1133, 
1134. 
11351 
1136, 
1137, 
11 38 J 
1139, 
1140 

11421 
11431 
11441 

11451 
1146, 
1147, 
1148, 
1149, 
1150, 
1151. 

1152; 
1153, 
11541 

11S5* 
1156, 
1157, 
1158. 

U59l 

1160* 
1161. 



PROC/TXT 



0ail62L 



0M1162L 
001163L 
001164U 

001165L 

00U66L 
05^11671 

0011701 
001170L 
0ill7lL 
001172U 

i01l73L 
001174L 
001175L 
001176L 

001177L 
0011771. 
001200L 
001201L 
001202L 
001203L 
001204L 



01010001 

01101111 

01010001 
11001011 
01010001 
11001111 



01110100 
00110111 
11000000 
01010010 
00110011 
00110111 

11001111 



01110010 

0U01111 
01010010 
00110111 
11000001 
01110001 



00001111 
11110010 

10000000 

01100110 

10000111 
01100110 



11110001 

00000110 
10000011 
00001001 
11010001 
00100001 
01111000 



11110001 
11110001 

1 1 1 1 1 1 ta 

00000110 
01111010 
11110001 



DATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE 1 

HICRO-PROCESSOR EMULATION SUPPORT COOF " HJS •• 
DECIMAL FIELD OPERATIONS 



78JUL20 11144 



DFOP 
4,25 



(HI 041) OFAC 
♦ C * 7,45 

flOD 041) OFAC 



(062 041) OFSfl 
4.25 + C * 7,85 

(lEV 041) 0FS8 

TEMPI <i» CML) •AND, 017 
HL *9 »L -1 
MAR <• DE 
DE <• OE * 1 
C <■» UCFL6 
T <• (MAR) .ANO, 017 
IF IMP 000 THEN T <«• TEMPI «- 
LUF «■ T ♦ (<»10) 

IF NOT C THfN T «*• 
(MAR) «- T ,IOR, IJR8 
RIN16 
ELSE LUF <• T «» T * TEMPI 

IF C THEN T <• T ♦ 
(MAR) <* T ,I0r1 URB 



OFSUB 



0F8EN0 



OPAOO 



LORI 

BAL 
BRA 
BAL 
BRA 



RIN16 

TEMP2,017 

,DFAOO 
8F0P,T»,I0 
,0F8UB 
8F0P 



OOPR LUFtSB, TEMPI 

BRA OFSENO.FC 

OOTI lACilKf-l 

DOPP MDW,OR,URI*URB 

BRA RIN16 



OORR 


TEMPI, AC, TEMPI 


DOPI 


LUF. AC, •10 


BRA 
LDTR 


OFAENO,TC 
TEMPI 



OECIMAL FIELD ADD 
OFAC UNSPECIFIED 
DECIMAL FIELD SUBTRACT 
DFS8 UNSPECIFIED 
SELECT 4 BITS ONLY 



T ♦ TEMPI (DFAC) 

(SET CARRY ON 10 OR GREATER) 

g CORRECT IF >■ 10 
TEMPI «10, USE ORIGINAL VALUE 



(DF8B) 
(NEGATIVE IF UNOEFLOW) 
9 (♦ C FOR ♦ 10| TO CORRECT) 



SELECT 4 BITSi NOT ALL OF THEM 

(ASSUME THIS) 

WAS ODD THEREFORE WAS DECIMAL AOO 

WAS EVEN SO IT WAS DECIMAL SUBTRACT 



SET FLAGS ON SUBTRACT 

NO CARRY, NO PROBLEMS 

CARRY, CORRECT THE VALUE (ADDS 101) 

SET THE ZONE BITS 



AOO TOGETHER (CARRY FALSE ON RESULT) 

SET FLAGS & CORRECT IF OVERFLOW 

IF OVERFLOWED, CORRECTED NOW 
NO CARRY, GET CORRECT VALUE 



( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

( 

< 

( 

{ 

( 

( 

( 



DATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE I 

PAGE 39 PROC/TXT MICRO-PSOCESSOR EMULATION SUPPORT CODE - HJ8 • 78JUL2e 11144 

, DECIMAL. f^IELD OPERATIONS 

1162*. 001205L milmii lli?lB0(»l DFAENO DOPP MOW,OR,URI*URB SET THE ZONE BITS 

09iig06L 00110111 mimmi 

U«3' , BRA RIN16 

1184. 






DATAPOINT CONFIOeNTIAL INFORMATION - SEE PAGE 1 
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PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT COOF - HJ8 » 78JULg0 11144 
, REPEATED INSTRUCTIONS, REPEAT CONTROL SECTION 



U67. 

nee; 

1189' 
U70' 

1171, 

1172, 

1173 

1174, 

11751 

1176 

1177. 

1178'. 



1179, 
1180, 
11811 
1182, 
1183, 
1184. 
11851 
1186' 
1187, 
1188, 
1189, 
1190. 
U9ll 



11921 
11931 



001207L 



f«»l207L 
0«121PIL 

mxzxM 

801212L 
0(^1213L 
0«1214L 

i<^12l5L 



eil?il2l5L 

0l?!l2l«5L 

09»1217L 

>0?ll22C»L 

>0«1221L 



«0010111 

001105101 
01010100 

00110111 

01 §00101 

11000010 



00110001 
01010101 
00110111 

81011001 

11001111 



10110010 
11010010 

00000001 
10000010 
00001111 
10110001 



11011100 
11011111 
10001100 
IllllUl 
lUlllll 



RIN16J 

, RPT * 1.70, 8RV - 1.45, END • 3.95 

, FIELD REPEATED INSTRUCTIONS ARE THOSE THAT COUNT C THROUGH 16 MAX STEPS 

f 

, URC <• URC «» 1 

, IF CT .AND, 017) NOT ZERO THEN RINST 

• 



ELSE RIND 



CCLR 

OOPIP URO-t-URCSB^liURI+LIRC COUNT 0OWN 



TSTIT ,017 
8RA RINST, PZ 

RINOJ 

3,25 CNONbIMP) 



AT THE END (BASE 16)? 
NOT YET 



REPEATED INSTRUCTION END. 
CLEAR THE REPEATED FLAG 

PSW 4m PSW .AND, -1 - SWRPT 
FETCHW 

OOPIP P8WO,NO,#1«8WRPT,PSWI 



9RAX FETCHW 



(BECAUSE SOME END IN MDW WITH NO MWAIT) 



PATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE I 
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M96, 

11981 
U99l 

1200^ 

IZP*!. 
12«2, 
121213, 
1204^ 
12«5^ 
I2i6^ 
12«»7. 

12081 

12i9l 



PPOC/TXT 



12211 
1222, 
12231 
1224, 

1225, 
1226. 
iZ27', 
1 Z c , 
1229, 
12301 
12311 
1232, 
1233, 
12341 
1235, 
1230, 
1237, 
1238, 
1239, 
1240. 



124ji 



01312221. 



0«1222L 
0012231 

0012251. 



1210, 001226L 

1211, 

1212. 

1213* 

1214, 

1215, 

1216, 

1217, 

1218, 

1219, 

1220. 



0012261 
801227L 
001230L 

001231L 



001231L 
001232U 
0012331. 
001234U 
001235U 
0012361, 



01010001 
01101111 
01010001 
11001111 



01010001 
01101111 
01010001 



01101111 
00110001 
00110001 
00110111 
00110001 
01010100 



MICPO^PPOCESSOR EMULATION SUPPOPT CODE • HJS - 
, BINARY FIELP OPERATIONS 



78JUL20 UI44 



* 
8F8BI 

C 031) 
2.25 ♦ C * 6,90 

fill 0315 
(062 031) 

T <i 8FSU8 
8F0P 



8FS8 



lllllUl 

11110010 
01000011 
01100110 



LORI TEMP2,0377 
8RC 8F0P,,8FSU8 



ilNARY FIELD SUBTRACT 



INTEGER DIVIDE 
INTEGER DIVIDE 



SELECT ALL THE BITS 



* 
8FACJ 



t 011) 

2,25 + C * 6,70 

(111 011) 
(IMP 011) 

T <■ 8FAD0 
BFOP 



8FAC 



H 1 1 1 1 1 1 
11110010 

01000111 



LORI TEMP2,0377 
iAL #iFAOn 



BINARY FIELD ADD 



INTEGER MULTIPLY 
2»8 COMPLEMENT 



SELECT ALL THE BITS 



8F0P 
4.1 



10U0000 
11000110 
11100101 
01000111 
10010000 
00000001 



BINARY FIELD OPERATIONS 

LINK <• T 

TEMPI «- (HL) 

HL «w HL -^ I 

MAR «• (DE) 

DE <• DE •» I 

CARRY <• UCFLG 

T «• (MAR) 

IF LINK ■ 8FA0D THEN LUF «• (MAR) «• T ♦ TEMPI 

RIN16 
ELSE LUF <• (MAR) «« T « TEMPI 

RIN16 

8AS LlNKfCC 
DLOX HL2MR,,SMR 



DOECP URO*UR,MARI 



SET (HL) DATA AND UPDATE HL 



DATAPOINT CONFIDeWTIAU iNFORMATfO^ - SEC PAGE I 
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PROC/TXT 



MICPO-PROCeSSOR EMULATiriN SUPPORT CODE "- »J$ 
, BINARY FIELO OPERATIONS 



7BJUi,2B 11144 



12421 

1243; 

1244*. 
12451 

12461 



1847 
1246. 



1249' 

1250. 

12511 
1252' 

12S3y 
1254. 

1255* 
1256^ 

1258. 

1259* 

1260^ 
12«ll 



f«l237t 
00I1249IL 
0(«1241L 
001242L 
!?I5!1243L 
001244L 
0<»1245L 

05I1247L 

P!0l25eiL 
0012511 
001252L 
0012531 
0012541. 

001255L 
0012561 
001257L 
001260L 

001261L 
001262L 
001263L 
001264L 
001265U 
001266U 
001267L 

0012701 
001271L 
001272L 
0012731 

i0l274L 
0012751 
0012761 
001277L 



00110111 
00110001 
010101810 
00110111 
01U000J 
11000100 
11010111 
00110101 
01101111 
00110001 
00110001 

00U01H 

00110001 
01010100 
00110111 

00U0ie!l 

01010100 
00110111 

00110001 
00110010 
01110001 
11000100 
11010UI 
00110101 

11101111 
01U0«10 

00110111 

0P!ii0in 

11001111 

01U0100 
00110111 
00110111 
11001111 



10000110 
10U0000 
00000000 
10000101 
11110810 
01011011 
00001001 
00110110 

10U0001 
11000100 
11100011 
01100111 
10010000 
00000001 
10000100 

imAmm 

00000000 
10000011 

00110101 
00110101 

11110010 
01001011 
00001001 
00110110 
00000000 

11110001 
00100001 
00000110 
01111000 

11110001 
00100001 
00000110 
01111000 



8EA00 



8FSUB 



LDTR TEMP2 

MWAIT iMEMPFl 

OORP TEMPI, NO, MDR,,CC 

OLOX DE2MR,,8MR 

ODECP URO+UDe,HAR| 



OOTP 
BRR 



IDPT 
BRA 



LDPT 
BRA 



PUT IT IN TEHPl 



GET CDE) OATA ANO UPOATE OE 



DOTPP ,AC»UCFLG,UCFLG 

LOTR TEMP2 
MWAIT ,HEMPF1 



CARRY IGNORED, BITS 2&6 NOT BOTH HIGH 
SET THE CARRY 



,NOiHOR 
LINK 



OOPR MOW, AC, TEMPI 



LUF 
RIN16 



OOPR MOW, SB, TEMPI 



SELECT ADO S SUBTRACT, BINARY S OECIMAL 
(OE) «* CDE) + CHL) 

(OE) «» (OE) * (HL) 



LUF 
RIN16 



DATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE I 
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12154: 

18fi5, 00l3e!0L 

1266, 

1267, 

1288, 

1269, 

1270, 

1271, 

1272, 

1273, 

1274^ 

12751 

1276, 

1277, 

1278, 

1279, 

1280, 

128lJ 

1 282 » 

1283'. 

12841 

1285, 

1286. 



PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT CODE * HJS - 
BINARY FIELD SHIFTS LEFT AND RIGHT 



78JUL20 ilt 44 



12»7. 

1288' 
1289. 



1290* 

1291, 
1292, 
1293. 

1294* 
1295, 
1296. 
12971 
12981 
1299. 

135101 
1301, 
1302, 
1303. 



001300L 
001301L 
001302L 
001303L 

09I1304U 
001305L 
001306L 
001307L 
001310L 
0013HL 
001312L 
001313L 
001314L 
0013151 
00l3iaL 
001317L 
00132iL 
001321L 
a0l322L 
001323L 
001324L 
001325L 

001326L 
001327L 
001330L 
001331L 
001332L 
001333L 



00110001 
00110001 
00110115 
11001001 

00110001 
00010U0 
00110111 

00110001 
00110110 
00110001 
00010111 

00010111 
U000100 
11010111 
00110001 

00010HJ 
0011011! 

00010111 

01101111 
01110010 
00110111 
11001111 

00010111 
00110001 
01010100 
00110111 
00110001 
01010100 



11000110 
11100101 

01000111 

00101001 

10010000 
01110010 
10000110 
10110000 
10000101 
00110101 
10100010 
10110010 
08110011 
00001001 

00110110 
10010010 
00100001 
10010010 

UU0001 

00110001 
00000111 
01111000 

10110010 
10010000 
00000001 
10000110 
10110000 
00000000 



BFSJ 

t 0735 BFSL 
2,25 ♦ C ♦ 4,55 



BINARY FIELD SHIFT LEFT 



fill 0755 8FSR 
4,25 + C * 4,55 

(IMP 0755 BFSR 



BFSR 



BFSL 



BINARY FIELD SHIFT RIGHT 
BFSR UNSPECIFIED 
NOTEt ONLY CHANGES THE CARRY FLAG 



MAR <m HL 

IF IMP ZERO THEN HL <«» HL • I (BFSL) 

C <» UCFLG 

LUCF «•» (MAR) *m (MAR) ♦ (MAR) 

RIN16 
ELSE HL «» HL ♦ I (BFSR) 

L <• UCFLG 

(MAR) <• (MAR) SHFT I 

LUF <- L 

RIN16 



BRA 



LDTP 

SHIFT 

CCLR 
MWAIT 

LDTP 

SHIFT 

LDPT 

SHIFT 

LORT 

OOPR 

BRA 

CCLR 
DOECP 



ARITHMETIC SHIFT LEFT 



ARITHMETIC SHIFT RIGHT 



DLOX HL2MR,,SMR 



8FSL,T#,IZ 



DADOP URO+UR,MARI 



GET DATA TO SHIFT * SELECT R/L ROUTINE 



UPDATE HL 



UCFLG 
SL 

r MEMPFl 

MOR 

SR 

MDW 

SR 

TEMPI 

LUCF, AC, TEMPI, ,C0 

RIN16 



URO+UR,MARI 



PUT THE CARRY IN THE LSB (BIT 0) 
AND INTO THE LINK 



SET THE DATA 
DO EXTENDED SHIFT 
OUTPUT SHIFTED DATA 
PUT LINK IN THE MSB 

SET THE CARRY FROM THE MSB (LINK) 



UPDATE HL 



DATAPOINT CONFIRENTIAL INFORMATION " SEE PAGE 1 
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i304l 

1396*. 
13071 



13R8' 
1309. 



PPDC/TXT 



00i334t 00110111 10000101 



MICRO»PROCESSOS EMULATION SUPPORT CODE • HJS 
, BINARY FIEIO SHIFTS UFFT AND RIGHT 



78JUU20 llt44 



001335L 
001336L 
001337L 
001340L 
001341L 
00l34tL 
001343U 
001344U 
001345L 



00H0001 

00U0010 
U000100 
11010111 

00110001 
00110010 

00110111 
001 1011 1 
lli01Ul 



00U0101 

00110101 

00100000 
00001001 
00110U0 
00110110 
00100001 
000001U 
01111000 



DOTPP ,AC»UCFLG»UCFLG 

MWAIT ,MEMPFi 

DOPPP Mr>W,AC,MDR,MDR 



CARRY IN STOPPED IN BIT ? OR 6 OF UCFLG 
SET CARRY FROM USER CARRY 



SHIFT LEFTi 



LOPT 
8RA 



i»UCF 
RINia 



SET CARRY ON RESULT 



OATAPOINT CONFJOENTIAL INPORMATTON • SEE PAGE I 
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PROC/TXT 



MICRO-PPOCESSOR EMULATION SUPPORT CODE - HJ8 m 
, SHIFT OPERATIONS 



79JULgei 11144 



1318. 
1313, 
1314. 
1315, 
1316^ 

i3in 

1318' 
13191 
1320. 

13?lC 



13221 
1323. 



13241 
13S5y 
1326. 
1327' 
13281 
1329' 
13301 
13311 
1332, 
1333, 

1334; 

13351 
1336, 
13371 



1338. 

1339* 
1340^ 

1341- 
1342, 

1343, 
1344, 
1345, 
1346, 
1347, 
13481 
1349' 
1350, 
1351, 
13521 
1353' 
13S4, 
1355, 
13561 
13571 



00)13461 



001346L 
0e>l347L 
?SRil35eiL 
01813511, 
0013521 
>001353L 
>i01354L 

001355L 



0eil355U 
001356L 
0PI1357L 
5»01360L 
001361L 
0013621 
001363L 
>001364U 
»00l365l 

001366L 



00136SL 
001367L 
001370U 
001371L 
001372L 
001373L 
001374L 
001375L 
001376L. 
00137TL 



00110001 
01101111 

01110010 
00110111 

00110110 

01011001 
11001111 



00110001 
00010111 
00010111 
00110111 
01101111 
01U0010 
00U0111 
01011001 
11001111 



00110001 
00010111 
00010111 
00110001 
00010111 
00110111 
00010111 
01101111 
01110010 
00110111 



11011111 

11110001 
00110001 
00000111 

10001111 
UlllUl 

iiiiim 



1101UU 

10110010 

10010010 
10001111 
11110001 
00U0001 

00000111 
llUllll 
lUlllll 



00110101 
10100010 
10110010 
11011111 
10010010 

10001111 

10010010 

11U0001 
00U0001 
00000111 



8LCJ 
5,00 



3,100 



* 

SRCt 
3^20 
5,20 



* 
SREI 

, 3yi 55 

. 5.55 



( 002) sue 
eiMP 0021 SLCR 

LUCF <- T <m IMP ♦ IHP 

IMP <•• T + CARRY 

LDRP TFMP1,IMPI 

DOPR IUCF,AC»TEMP1,,C0 

OOP IMPO,IT 
BRAX FETCHI 



C 012) SRC 
fIMP 012) 8RCR 

IMP «- T <•. IMP ROT 1 
LUCF «w T ♦ T 



SHIFT LEFT CIRCULAR 
USING OTHER THAN A-REG 



ADO TOGETHER AND SET USER CARRY 

PUT CARRY IN THE L58 

OONtT USE IMPFO, WILL GET BAO CARRY 



SHIFT RIGHT CIRCULAR 
USING OTHER THAN A-REG 



LOTP 


IMP! 


CCLR 




SHIFT 


SR 


LDPT 


IMPO 


LORT 


TEMPI 


DOPR 


LUCF,ACiTEMPl,,C0 



SET THE LINK BIT ON LSB 
RIGHT CIRCULAR 
STORE RESULT 

SET CARRY ON THE MSBIT 



BRAX FETCHI 



f 032) SRE 
eiMP 032) SRER 



SHIFT RIGHT EXTENOEO 
USING OTHER THAN THE AwREG 



LINK <- UCFLG (CARRY) 

LINK, IMP 4m CLINK, IMP) ROT 1 

T *m (LINK, IMP) ROT 1 MOVES LINK INTO MSBIT 

LUCF <* T + T 



LOTP UCFLG 

SHIFT SL 

CCLR 

LDTP IMPI 

SHIFT SR 

LDPT IMPO 

SHIFT SR 

LDRT TEMPI 

OOPR LUCF, AC, TEMPI, ,C0 



GET CARRY 

IN LSBIT 

ANO INTO LINK 

00 RIGHT EXTEND 

PUT LINK IN MSBIT 

SET CARRY ON LINK 
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PROC/TXT 



1358 



1359 
1360 
1361 
1362 
1363 
1364 
1365 
1366 
1367 
1368 



>e!9tl4giL 
>0«1401L 



0?»140gL 



01011001 
U0PI1111 



llllllU 

! 1 1 m 1 1 



OATAPOINT CONFIOENTlAl INFORMATION m SEE PASE 1 

MICPOwPROCESSOf? EMULATION SUPPORT CODE - HJS *■ 
. SHIFT OPERATIONS 

BRAX FETCHI 

* 

, TABPAGE PROOL 



78JUL20 11144 



CCS t 
2,75 
4,75 



1369; 
1370! 



0014031. 
0PI1403L 
00l4g4l 
0Pll4ei5L 
0014061 



00110001 
01010101 
00U01U 

01011001 
11001111 



00110101 

U000011 
100011U 
IHUIU 
UlUlll 



( 042) CCS 
(IMP 042) CCS 

IMP *• UCFLG .AND, 0303 

DOPIP IMPO, NO, 0303, UCFLG 

8RAX FETCHI 



CONDITION CODE SAVE 
USING OTHER THAN AwREG 

ONLY SEC THE IMPORTANT BITS 



( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
( 
< 
( 
( 
( 
( 
( 
( 



OATAPOINT CDNFIDENTUU INFORMATION - SEE PAGE I 
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1373. 

13741 

1375^ 

13761 

1377* 

1378. 

1379^ 

1380. 

1381, 

13821 

1383^ 

1384' 

1385, 

1386 

1387 

13881 

1389. 

1390' 

1391^ 

1392^ 

1393, 

1394, 

13951 

1396J 

1397, 

1398. 

13991 

14«0l 



PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT COOC •• HJS » 
, SINGUE AND DOUBLE PAGED LOAD AND STORE 



78JUU20 11144 



r 



14?lil 
145)21 
14PI31 
14041 
14051 

14061 

1407' 

14081 

14091 

14101 
14Ul 



001407L 



i0l407L 
001410L 
001411L 
001412L 
001413U 
001414L 
00141SL 
001416L 
001417L 
001420L 
00l42tU 
001422L 
i0l423L 
001424L 

001429L 
001426L 
001427L 
001430L 
001431L 
0014321 
001433L 
001434L 
00143SL 
>001436L 
»001437L 



00110111 

00110111 

00110001 
00110001 
11010100 
11010111 
00110001 
00110111 
00110001 
00110111 
11001110 
11010100 
11010111 
00110001 

00110111 
11011001 
00110111 
00110111 
11001110 
11010100 
11010111 
00110001 
00110111 
01011001 
11001111 



00001100 
01000111 
10001001 
10101000 
11110100 
00001001 
00110110 
11000000 

11100111 

01000111 

1 U 1 1 1 1 1 

11101101 
00001001 
00110110 
10001101 
11100101 
00001100 
01000111 
llllUU 
11100101 

00001001 
00U0110 
10001111 

UiltlU 
1 1 1 1 1 1 1 1 



PLR8 
5.85 



9.25 



fill 
f0e2 
(113 
fl74 
fll5 
tl76 

fll7 
(IMP 



IR4) 
105) 
114) 
124) 
134) 
144) 
154) 
164) 

124) 
114) 
144) 
134) 
164) 
154) 

105) 
1R4) 



PLR.IDX 
PLR.IOX 
PLR^IDX 
PLR.IOX 
PLR.IDX 
PLR^IDX 
PLR.IOX 
PLR.IDX 

DPL.IDX 

DPLR.IOX 

DPL.IOX 

OPLR.IOX 

DPL.IDX 

OPLR.IDX 

PLA.IOX 
PLR.IOX 



FETPl 



PC «'' MAR <» MAR ♦ I 

MAR <• X, (MAR) 

135 «• (MAR) 

IF IMP NOT ZERO THEN IMP <• 

8T8 IMAR.SMR 

OLOX MR2PC 

MWAIT ,MEHPFl 

LDPP MAROLiMOR 

LOX XX2MRH+URX,SMR 

MWAIT NDOP.MEMPFl 

LDPP I35Q|MDR 

BRA FETPLfTP^IZ 
STB IMAR,SMR 

MWAIT NOOPfMEMPFl 

LDPP IMPO,MDR 
BRAX FETCH 



LOAD REGISTER FROM PAGED LOCATION 



A-REG LOAD (104 

LOAD B»REG FROM 

LOAD C-REG FROM 

LOAD O-REG FROM 

LOAD EoREG FROM 

LOAD HwREG FROM 

LOAD L*REG FROM 



IS NOT A PLR) 
PAGED LOCATION 
PAGED LOCATION 
PAGED LOCATION 
PAGED LOCATION 
PAGED LOCATION 
PAGED LOCATION 



BC REG PAIR LOADED FROM PARED INDEX 

BC REG PAIR REVERSED 
OE REG PAIR LOADED FROM PAGED INDEX 
DE REG PAIR REVERSED 
HL REG PAIR LOADED FROM PAGED INDEX 
HL REG PAIR REVERSED 

XA REG PAIR UNSPECIFIED 
UNSPECIFIED MIXED UP REG PAIR 

USE 105 NOT 104 FOR 1R4 WITH R«0 



(MAR+l) 

GET THE INDEX 

AND SAVE AWAV NEW PC 

LS8 ADDRESS 

MSB ADDRESS AND GET DATA 



GOT THE DATA 

IF IMP NOT ZERO GET ANOTHER BYTE 



GET THE SECOND DATA BYTE 



DATAPOINT CONFIDENTIAL INFORMATION m SEC PAGE 1 
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J412 
1413 
1414 
1415 
1416 
1417 
1418 
1419 

use 

1421 
1422 
1423 
1424 
1425 
1426 
1427 
1428 
1429 
1430 
1431 
1432 
1433 
1434 
1435 
1436 
1437 
1438 
1439 

1440 

1441 

1442 

1443 
1444 

1445 
1446 
1447 

1448 
1449 
1450 

1451 



PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS m 
, SINGLE AND DOUBLE PAGED LOAD AND STORE 



78JUL20 UM4 



?|0144C1L 



0e!144!?tL 
^01441L 
0<?I1442L 
001443L 
e!!?l444L 
i0l445L 
8PI1446L 
S01447L 
0!?!145BIL 
001451L 
0il452L 
001453L 
?!ai454L 
B^MSSL 
00145eL 
S«1457L 
0?!146P!L 
>»PI1461L 
>0e»l482L 



0(?ill«51ll 
^0110111 
0811 10001 
00110001 
11010100 

11010111 

00110001 

00110U1 

00110001 
00110001 
00110111 
1101100J 
00110001 
11010100 

11010111 

00110U1 
00110111 
01011001 

11001111 



00''I0U00 
01000111 
10101001 

10101000 
11011011 
00001001 
00110110 
11000000 
111001U 

1101U01 

00100001 
11001110 
11011111 
11010010 
00001001 
0000U00 
00100001 

llUlltl 

lltlllll 



PSRI 

5.20 



8.55 



C 
( 
C 
f 
C 
t 
f 
t 

fill 
(062 
fll3 
(174 
C115 
(176 

C117 
(IMP 



1R6) 
107) 
116) 
126) 
136) 
146) 
156) 
166) 

116) 
116) 
146) 
136) 
166) 
156) 

107) 
IR6) 



P8R.I0X 
P8R,IDX 
PSR.IOX 
PSR.IDX 
PSR.IOX 
PSR.IDX 
PSR^IOX 
PSR.IDX 

OPSR.IDX 

OPSR.IDX 

OPS.IDX 

OPSR.IDX 

OPS.IDX 

OPSR.IDX 

PS .IDX 
PS ,IDX 



STORE REG INTO PAGED LOCATION 
A REG SAVE (106 IS NOT A PSR) 
STORE RE6-B INTO PAGED LOCATION 
STORE REG-C INTO PAGED LOCATION 
STORE REGpD into PAGED LOCATION 
STORE REGwE INTO PAGED LOCATION 
STORE REGi-H INTO PAGED LOCATION 
STORE REG-L INTO PAGED LOCATION 

8C REGISTER PAIR SAVED 

0C REGISTER PAIR REVERSE SAVED 

DE REGISTER PAIR SAVED 

OE REGISTER PAIR REVERSE SAVED 

HL REGISTER PAIR SAVED 

HL REGISTER PAIR REVERSE SAVED 

XA REGISTER PAIR UNSPECIEIED 
UNSPECIFIED MIXED REGISTERS SAVED 
(USE 107 NOT 1R6 FOR R»0) 



PC «• MAR <-> MAR ♦ 1 

MAR *m X, (MAR) 

(MAR) <• 135 

IF IMP NOT ZERO THEN (MAR4-1) <- IMP 



FETPS 



STB 


IMAR,SMR 


DLOX 


MR2PC 


MWAIT 


,MEMPF1 


LOPP 


MAROLiMDR 


LOX 
LOPP 


XX2MRH*URX 
MDW,I35I 


BRA 
LDTP 

MWAIT 


FETPS, T»,n 

IMPI 

iMEMPFl 


8TI 

LOPT 

BRAX 


IMAR 

MOW 

FETCHW 



GET THE INDEX 



UPDATE THE PC SO IT CORRECT 



LS8 ADDRESS 

AND MSB ADDRESS FROM X»REG 
SAVE THE REGISTER IN MEMORY 

DONE IF IMP ZERO 

GET OTHER REG TO SAVE 



POINT TO ITS SAVE AREA 
SAVE IT 



OATAPDINT CONFIOENTIAL INFORMATION ^ SEE PAGE I 
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1454' 
1455, 
1456^ 
1457^ 
1458^ 
14591 
1460; 
1461, 
1462, 
1463J 
1464, 
1465' 
1466, 
1467, 
1468, 
1469, 
1470. 

147li 
1472, 
1473, 



P«?OC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT CODE - HJS » 
REGISTER PAIR INCREMENT AND DECREMENT 



78JUL20 11U4 



0B1463L 



«9»1463L 
0e)l464L 
00146SL 
0014661 
?91467l. 



1474, 0^147»U 

1475, 

1476, 

1477, 

1470, 

1479, 

1480, 

14811 

1482, 

1483, 

1484, 

1485, 

I486, 

1487, 

1488, 

1489, 

1490, 

1491, 

14921 

1493. 

14941 

14951 
14961 
14971 
1498, 
1499, 
1500. 



I50ll 



0314701 
001471L 
001472L 
001473U 
001474U 
001475L 
001476L 
0014771 
0015001 
00 1 50 1 L 
001502L 
>00l503l. 



11011000 
01010001 

00110111 
00110001 

11011111 



11011000 
01010001 
00110111 
01010001 
11011010 
01010001 
00110111 
01101111 
0W11000! 
01110010 
00110111 
01011001 



11001001 
00080110 
00000001 
11010000 
11000000 



11000100 
00000110 
00000001 
00000001 
11000000 
00000010 
00001001 
11110001 
11011111 
00110001 

01101111 

1 1 1 I 11 1 1 



NCPAI 
4^20 
6.05 



-.65 



INCPA8 

* 

INCPI 
4^15 
6,15 
6,00 
6,15 
6,00 
6,15 
6,15 
6.00 
••,65 



INCPS 



INCPIT 



t 017) INCP HL,A 

(062 0175 INCP 

C174 «17) INCP 

(022 0175 INCP 
IF NO CARRY 

C176 017) INCP 
ClOD 017) INCP 

IF IMP ZERO THEN IMP <s URl 

T <m URA 

INCPIT 

BRA INCPAS,F#,IZ 
LOPI UIMP,URL 

LDTP URI+URA 
BRA INCPIT 



C 015) INCP 

(111 015) INCP 

(062 015) INCP 

(113 015) INCP 

(174 015) INCP 

(115 015) INCP 

(117 015) INCP 

(022 0155 INCP 
IF NO CARRY 

(176 015) INCP 



INCREMENT REG PAIR USING A AS OISP, 

8C,A 

DE,A 

XA,A 



ML, A UNSPEC'O 

UNSPECIFIED MISMATCHED REG PAIRS 



USE HU IF NO IMP SPECIFICATION 



T LOADED WITH VALUE TO ADD, GO 00 IT 



HL INCREMENTED 8Y I 

XA,2 

iC INCREMENTED BY 1 

BC#2 

OE INCREMENTED BY I 

DE,2 

HL»2 

XA INCREMENTED BY I 



HL BY 1 UNSPECIFIED 



IF IMP ZERO THEN IMP <m URL 
T <• 1 

IF IMP ODD THEN T <- 2 

IMP <m IMP - I 
LUF «• IMP, IMP.l <• IMP, IMPfl ♦ T 



BRA INCPS, F#,IZ 

LOPI LIMP, URL 

LOTI 1 

BRA INCPIT, F», 10 

LOTI 2 

STB DIMP 

LORT TEMPI 

OOPRP IMPFO, AC, TEMPI, IMPI,C0 INC THE LSB (T-SAVC NECESSARY) 



DEFAULT TO HL PAIR 

ASSUME ITS BY I (ODD) 

NO, BY 2 CAUSE WAS EVEN 
CORRECT IT TO BE ODD 



8RAX FETCHI,FC 



IF NO CARRY FORGET THE MSB 



DATAPOINT CONFIDENTIAL INFORMATION • SEf PAGE I 
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PROC/TXT 



MICRO-PROCESSOR EMUlATIflN SUPPORT CODE - HJS w 
, REGISTER PAIR INCREMENT AND DECREMENT 
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1503. 



15<S4 
1505 



>e)ai504L iimmm uuiiu 
iei58i5u 09111011! mmimi 
0P11506L mii§mi 119111111 
5!0i507t. 0iai00i<» s^mmmB 

gJ0l5l«!L 0§5llilll ill0Ull 



STB OIMP 

OOPIP IMPFO,AC,0,IMPI 



1506. >I?)01511L lie^lUl UHUll 



BRA 



FETCHI 



INC THE MSB CCOULD USE IT) 



CAN'T USE »IT IMPFO' BECAUSE OEUAYED 
AtU CARRY THROUGH PROCESSOR CARRY 



OATAPOINT CONFIDENTIAL INFORMATION '^ SEE PAGE I 
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15ff7- 

1508, 0015121 

1510, 
15U, 
1512, 
1513, 
1514, 
1515, 
1516. 
15171 
1518, 
1519, 
1520. 
1521' 
1522, 
1523, I3e'l512t ll«!ll0i(?i 10113010 



MICRO-PROCESSOR EMULATION SUPPORT CODE m HJ8 *• 
, REGISTER PAIR INCREMENT AND DECREMENT 



78JUL20 118 44 



1524. 

1585* 
1526, 
1527, 
1528, 
1529, 
1530, 
1531. 
15321 
1533, 
1534, 
1535, 
1536, 
15371 
1538, 
1539, 
1540, 
1541, 
1542, 
1543, 
15441 
15451 
1546, 
15471 
1548. 

1549* 
1550, 
1551, 
15521 
1553, 
1554. 



001513L 
i?il5l4L 
0?!1515L 

i015l7L 



001517L 
0(^|52t^L 
001521L 
i0l522L 
001523L 
001524L 
001525L 
001526L 
001527L 
001530L 
001531L 



010100^1 

00110111 

00110001 
11011111 



110U000 
01010001 
00110111 
01010001 

11011010 

01010001 
00110111 
01101111 
00110001 
01110100 
00110111 



00000110 
00000001 

11010000 
10101001 



101011511 

00000110 

W0000i0i 

00000001 
10101001 

00000010 
00001001 

11U0001 

11011111 

00110001 
01101111 



DECPAI 
• 4.20 


( 0375 


DECP 


HLiA 


*, 6,05 
* *,65 


(062 0375 

(174 0375 

(022 0375 

IF NO CARRY 


DECP 
OECP 
OECP 






(176 0375 
(100 0375 


DECP 
DECP 






IF IMP ZERO THEN 
T ** URA 
DECPIT 


IMP <* URL 



OECPAS 



8RA OECPAS, F#,n 

LDPI LIMP, URL 

LDTP URI+URA 

BRA DECPIT 



ft 

OECPI 
4pl5 
6»15 

6.ee 

6,15 
6,00 
6,15 
8,15 

8,00 



( 0355 DECP 

(111 0355 DECP 

(062 0355 OECP 

(113 0355 OECP 

(174 0355 OECP 

(115 0355 DECP 

(117 0355 OECP 

(022 0355 DECP 
-.65 IF NO CARRY 



OECPS 



DECPIT 



DECREMENT REG, PAIR USING A AS OISP, 

iCiA 
OE,A 
X A i A 



HLiA UNSPEC'D 
UNSPECIFIED MIXER REGS 



SELECT HL AS DEFAULT REG PAIR 
GO OECR, USING A-REG AS OISP, 



HL DECREMENT BY 1 

XA,2 

8C DECREMENT BY i 



BC I 2 
OE 

HL,2 
XA 



(176 0355 DECP HL 

IF IMP ZERO THEN IMP <« URL 

T <* 1 

IF IMP ODD THEN T <• 2 

IHP *m IMP - 1 
IMP, IMP-1 <m IHP, IMPfl .. T 



DECREMENT &Y I 
DECREMENT BY 1 
DECREMENT BY 1 UNSPEC'D 



BRA OECPS, F#,IZ 

LDPI LIMP, URL 

LDTI 1 

BRA DECPIT, F#, 10 

LDTI 2 

STB DIMP 

LDRT TEMPI 

DOPRP IMPFO, SB, TEMPI, IMPI,C0 



EXACTLY LIKE ABOVE BUT USING SB'S NOT AC 



DATAPOJNt CONFIDENTIAL INFORMATION -• SEE PAGE 1 
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PROC/TXT 



1555. 

1556* 
1557. 



15581 
1559; 



»89I153?L 
>i«ll533U 
0W1534U 
0^15351 
f«l536L 
0il537l. 
>i0l54au 



010110181 
0«1101U 

00110111 
11001111 



luum 

1 U 1 U 1 1 

00001001 

U01U11 

00000000 

0U0UU 
U U 11 1 1 



MICRO-PROCESSOR EMULATION SUPPORT CODE • HJ8 *■ 
, REGISTER PAIR INCREMENT AND DECREMENT 



8RAX FETCHI,PC 

STB DIMP 

OOPIP IMPFO»SB,0,IMPI 



78JUL80 11144 
IF NO CARRY FORGET THE MSB 



8RA 



FETCHI 



OATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE I 
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1562- 
1563^ 
1564^ 
1565^ 
1566, 
15i7y 
1568. 
1569^ 
15701 

1571 

1572' 

1573^ 

1574, 

1575, 

1576, 

1577, 

1578; 

1579; 



1580. 
J5»ll 
1582. 
15831 
1584, 
1585, 
1586, 
1587, 
i 588, 
1589, 
1590, 
1591, 
15921 
1593, 
1594, 
1595, 
1596, 
1597. 



PROC/TXT 



MICRO-'PPOCeSSOR EMULATION SUPPORT CODE • HJS w 78JUL20 11J44 

. INDEXED tOCATIONS# INCREMENT AND DECREMENT IN PLACE OR TO REG PAIR 



001541L 



0fl541L Bi$i$mi §1101011 

09I1542L iiiiuii ima^n 

0e!l543L 



* 

DECXI 
11.40 
14.90 

11.90 
13.40 
11.90 
13.40 
11.90 
13.40 



* 

INCXI 
11.10 
14,60 

11,80 
13.30 
11.80 
13.30 
11.80 
13.30 



i(?tl543L 01010001 10000000 



( 085) OECI.LSP.IOX 

fill 025) DECI.LSP.MSB.IOX 

(062 085) LFIO.LSP.IOX 

C113 025) LFIO.LSP.MSP.IOX 

fl74 025) LFIO.LSP.IOX 

ai5 025) LFIO.LSP.MSP.IOX 

(176 025) LFIO.LSP.IOX 

(117 025) LFIO.LSP.MSP.IOX 

(022 025) LFIO.LSP.IOX 

T «i OECIT 
INDX 



8RC 



( 
(HI 

(062 
(113 
(174 
(115 
(176 
(117 



INDX,, OECIT 



005) 
005) 

005) 
005) 
005) 
005) 
005) 
005) 



INCI.LSP.IDX 
INCI.LSP.MSP.IOX 

LFII.LSP.IOX 

LFII.LSP.MSP.XDX 

LFII.LSP.IOX 

LFII.LSP.MSP.IDX 

LFII.LSP.IOX 

LFII.LSP.MSP.IDX 



DECREMENT INDEX iY DISPLACEMENT 
WITH DOUBLE 8YTE DISPLACEMENT 



8C LOADED WITH 
WITH DOUBLE 

OE LOADED WITH 
WITH DOUBLE 

HL LOADED WITH 
WITH DOUBLE 



DECREMENTED INDEX 
BYTE DECREMENT 
DECREMENTED INDEX 
BYTE DECREMENT 
DECREMENTED INDEX 
BYTE DECREMENT 



XA LOADED UNSPECIFIED 

(AND SELECT INC, OR DEC, CODE) 
GO TO INDEX SPECIFYING DECIT SET 



INCREMENT INDEX 8Y DISPLACEMENT 
WITH DOUBLE BYTE DISPLACEMENT 

ec LOADED WITH INCREMENTED INDEX 
WITH DOUBLE BYTE INCREMENT 

OE LOADED WITH INCREMENTED INDEX 
WITH DOUBLE BYTE INCREMENT 

HL LOADED WITH INCREMENTED INDEX 
WITH DOUBLE BYTE INCREMENT 



(022 005) LFII.LSP.IOX XA LOADED UNSPECIFIED 



T <■ 
INDX 

RAL 



INCIT 



,INCIT 



DATAPOINT CONFIOENTIAL INFORMATION - SEE PAGE 1 



PAGE 54 



159R, 
1599^ 
1600, 

1602, 
1603' 
1604, 
1605. 
1606' 
1607, 
1608, 
1609, 
1610, 
1611, 
1612, 
1613, 
1614, 
1615, 
1616. 
1617'. 

leiel 

1619, 
1620. 

1621*^ 
1622. 

1623; 
1624'. 

1625* 
1626, 
1627, 
1628. 

1629* 
1630. 

I63i; 
1632. 
1633'. 

1634; 

1635; 

163©; 

1637^ 
1638. 
1639; 



PROC/TXT 



001544L 



001544L 
001545L 
001546U 
00l547t 
0015501 
0015511 
0015521. 
001553L 
0015541, 
001555L 
001556L 
001557L 
001560L 
0015611 
001562L 
001563L 
001564L 

001565L 
0015661, 
0015671. 
001570L 
001571L 
001572L 
001573L 
0015741. 
001575L 
0015761. 



00110U1 

00110111 
01101111 
11010100 
11010111 
00110001 
00110111 
00110111 
0110U11 
01010001 
11011010 
11010100 
11010111 

00110001 
0011011 1 
00110111 
00110111 
01101111 
00110001 
00110001 
11010100 

iiiiiiii 

00110001 
00110111 
00110001 
00110111 
11101111 



00001100 

01000111 

U110000 
10011000 
00001001 
00110110 
00001100 
01000111 
11110010 
00000000 
10001010 
10010000 
00001001 
00110110 
00001 IPI0 

01000111 
00001001 
11110001 
10001001 
10101000 
10000111 
00001001 

00110110 
11000000 
11100111 
01000111 
00000000 



MICROffPROCESSOR EMULATION SUPPORT CODE • HJS » 78JUL20 11144 
, INDEXED LOCATTONSi INCREMENT AND DECREMENT IN PtACE OR TO REG PAIR 

INOX 

INDEXED OPERATIONS TAKES 2 BYTES ON PAGE X-RIG ADDS DISPLACEMENT TO IT 
AND STORES THE RESULT IN A REG, PAIR OR BACK ON TOP OF ITSELF 

MAR <• MAR ♦ 1 GET DISPL, & INDEX BYTES 

TEMPL <• (MAR) 
MAR *m MAR + I 
TEMPH <m IF IMP ODD 

THEN IMP <• IMP • 1 
tMAR) 

MAR «• MAR ♦ 1 
ELSE 
PC <• MAR 
MAR *m X» fMAR) 
IF LINK m DECIT 

THEN T <•• (MAR, MAR*l) • T 
ELSE T <- (MAR, MAR+1) ♦ T 
IF IMP ZERO THEN (MAR, MAR+1) <» T 
ELSE (IMP, IMP^n <• T 



INDGET 



(MS8 IN MEMORY) 
(RESULT GIVEN TO TEMPH) 

(NO MSB BYTE, USE ZERO) 
PC SET TO INDEX BYTE 

DO THE INCX OR OECX 



STB 



IMARiSMR 



BA8 LINK 
MWAIT ,MEMPF1 



L0TP 
STB 



MOR 
IMAR,SMR 



LDRT TEMPL 

TCLR 

BRA INDGET, F#, 10 

MWAIT ,MEMPFl 



LOTP 
STB 

STB 

LDRT 

DLOX 



MDR 
IMAR,SMR 

OIMP 

TEMPH 

MR2PC 



001577L 11010100 10000000 
001600L 11010111 00001001 



INCIT 



MWAIT ,MEMPF1 

LOPP MAROLiMOR 

LDX XX2MRH*URX,SMR 

8RR LINK 

MWAIT ,MEMPF1 



GET DISPLACEMENT LSP 

FREE REGISTER FOR INC, DEC SELECT 

GET MSP OR INDEX 

SAVE LSP (LSP DISPLACEMENT) 
ASSUME MSP IS ZERO 

NO, GET MSP OF DISPLACEMENT 

GOT MSB 

POINT AND GET INDEX 

CORRECT IMP REG 

SAVE MSP 

PC SAVED AS CORRECT VALUE NOW 

GOT INDEX 

INDEX TO THE MAR LSB 

AND MAR MSB FROM THE XipREG 

SELECT OECIT OR INCIT 



OATAPOINT CONFIDENTIAL INFORMATION - SEE PAGE 1 
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PPOC/TXT 



MICR0»PR0CE880R EMULATION SUPPORT CODE • HJS * 7«JULa0 11144 
, INDEXED LOCATIONS, INCREMENT AND DECREMENT IN PLACE OR TO REG PAIR 



1640' 
1641. 

16421 

1643*. 

1644', 

1645* 
1646^ 
1647, 
1648, 
1649J 
1650, 

1651' 
1652, 
1653. 



1654, 
1655. 



1656, 
1657. 

1658, 

1659; 

1660'. 

16611 
1662, 
1663, 
1664. 

1665 

1666 

1667 



«I31601L 
001602L 
S01603L 
0»ie04L 
001605L 
001606L 
001607L 
001610L 
001611L 
001612L 

001613L 
0il614L 
001615L 
001616L 
001617L 
001620L 
001621L 
>001628L 
>001623L 

00l6a4L 
00t«25L 
091626L 
0il627L 
001630L 
001631L 
001632L 
001633L 
001634L 
001635L 
001636L 
001637L 

001640L 
001641L 
00ia42L 
00ia43L 
001644L 
»f0l645L 
>001646L 



00U0001 
00110111 
00110111 
01110010 
0U01111 

U010100 

11010111 

00110001 

0H 10010 

11011000 

00110111 
00110111 
01U0001 

11010100 

11010111 
00110111 
00110111 
01011001 

1100U11 



1101 
1101 

0011 

0011 
0011 
0111 

0110 
1101 

1101 

0011 

0111 

1101 



0100 

0111 

0001 

0111 

0111 
0100 

IIU 

0100 
0111 
0001 
0100 
1001 



00110111 
00110111 
00110111 
01110001 
00110111 
01011001 
I 1001 III 



00110110 
00001100 
01000111 
00 U 00 10 
11110010 
01U1001 
00001001 
00110110 
11110001 
01011111 

00100001 
00000110 
11110010 
01110001 
00001001 
00001101 
00100001 

UIUIU 
UUllll 

01101011 
00001001 

00110110 
0000U00 
01000111 
00110010 
11110010 

01100100 
00001001 
00110110 
U110001 
01110100 

00001001 
01101111 
00001000 
11110010 
10001111 
lllllUl 
1 1 1 1 U 1 1 



IN0X8 



DECIT 



INOXL 



LDTP MDR 

STB IMARfSMR 

DORR TEMPL»AC,TEMPL,,C0 

MWAIT ,MEMPF1 

DOTRP ,AC»TEHPH,MDR 

BRA INDXL^FtflZ 

LOPT MOW 

LOPT LUE 

LOTR TEMPL 

MhlAIT #MEMPF1 

STB OMAR 

LDPT MOW 

BRAX FETCHW 

MWAIT ,MEMPF1 



LDTP 
STB 



BRA 

STB 
LOPT 

LDPR 

BRAX 



MOR 
IMAR»SMR 



DORR TEMPLrSB, TEMPL, ,C0 
MWAIT ,MEMPF1 
DOTRP ,89fTEMPH#MDR 
INDXS,T#,n 



START TO READ FOR MSB FAST 
ADD DATA AND DISPLACEMENT LSB 

ADO MSB PART, LEAVE RESULT IN T 

SELECT LOAD REG PAIR OR RELOAD MEMORY 

PUT MSB RESULT BACK IN HEMORV 
SET CONDITION COOES 

PUT LSB DATA BACK ALSO 
IN CORRECT SPOT 



OIMP 
IMPFCIIMP 

IMPO, TEMPL 
FETCH 



GET LSB DATA 

START TO READ FOR MSB FAST 

SUBTRACT DISPLACEMENT FROM THE DATA 



SIMILARLY FOR THE MSB PART 

SELECT LOAD REG PAIR OR RELOAD MEMORY 

CORRECT POINTER TO MSB 

LOAD THE INDEX INTO A REGISTER PAIR 

THE LSB ALSO 



OATAPOINT CONFIDENTIAL INFORMATION m SEE PAGE 1 
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PROC/TXT 



MICRO-PROCESSOR EMULATION SUPPORT CODE » HJS » 
, DOUBLE LOADS AND DOUBLE STORES 



78JUL90 ill44 



1670; 
16711 
1672' 

1673: 
1674; 

1675, 
1676, 
1677. 

16781 
1679. 
16801 
16«lJ 
1682- 
1683, 
1 684 . 
1689^ 
1686. 

16871 

1688^ 
1689, 
1690, 
1691. 
1692, 
1693, 
1694, 
1695. 

16961 
1697. 
16981 
1699, 
1700, 
1701, 
17f2, 
17031 
1704' 
1705, 
1706, 
1707, 
1708, 
1709, 
17101 
1711, 
1712, 
1713, 
1714, 
1715. 



00i647L 



001647L 
001650L 

001651L 



0l010^e?l 
iiiiim 



00ll0if0 

«i0ii08i 



001651L 
001652L 
i0l653L 
001654L 

001655L 



0l010iai 
01101111 

01010001 

U011111 



00111111 

11110000 
00000110 
01000011 



OSl 
6,10 
8.80 

8.10 
7,95 
7,95 
8,10 



DLHLI 
6,50 



* 

DH 
6,50 
9,20 
8,35 
8,50 
8,35 
8,50 
8,35 
8.50 



t 

an 

(113 
tl74 
tl76 
(117 



027) 
0275 
027) 
027) 
027) 
027) 



08 
OS 
OS 
DS 
OS 
OS 

OS 
OS 
OS 



(062 PI27) 
(115 027) 
(022 027) 

T <■ OSTORE 
OLS 



BRC OLSfiOSTORE 



( 057) OL 

LINK 4* OSTORE 
T <■ URL 

DISLMP 



iAL 

LOTI 
9RA 



( 

(111 

(062 

(113 

(174 

(115 

(176 

(117 



LINK,OLOAD 

URL 
DLSLMP 



047) 
047) 
047) 
047) 
047) 
047) 
947) 
047) 



OL 
OL 
OL 
OL 
DL 
DL 
DL 



(022 047) OL 



T *m OSTORE 
OLS 



DEfHL 


OE WHERE HL 


POINTS 


BC,HL 


eC WHERE HL 


POINTS 


BCDE 


BC WHERE DE 


POINTS 


OE,SC 


OE WHERE BC 


POINTS 


HLfBC 


HL WHERE BC 


POINTS 


HLiOE 


HL WHERE OE 


POINTS 


BCiSC 


UNSPECIFIED 




DE.DE 


UNSPECIFIED 




XA,8C 


UNSPECIFIED 





SELECT REG PAIRS & 00 SAVE 



HLiHL 



LOAD REG PAIR 

HL 

FROM (HL) 



OE,HL 
BC,HL 
BCBC 
BCOE 
OE,BC 
Oe,OE 
HLfSC 
HLiOE 



LOAD 
LOAD 
LOAD 
LOAD 
LOAD 
LOAD 
LOAD 
LOAD 



DE FROM 
8C FROM 
BC FROM 
BC FROM 
DE FROM 
DE FROM 
HL FROM 
HL FROM 



(HL) 
(HL) 
(8C) 
(OE) 
(BC) 
(DE) 
(BC) 
(DE) 



XA,BC UNSPECIFIED 



001655L 01010001 00111111 



8AL 



»OLOAD 



LOAD SELECT 



OATAPOINT CONFIDENTIAL INFORMATIOM • SEE PAGE I 
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1716; 

1717, 

17i8. 

1719'. 

1780' 

1721. 

17221 

1723. 

1724, 

1725, 

17261 

1727' 

17281 

17291 

1730- 

17311 

1732: 

1733, 

1734, 

173S, 

1736, 

1737, 

1730, 

1739, 

17401 

1741 

1742' 

1743, 
1744, 
1745J 
1740, 
1747, 
1748. 
17491 
17S01 
17511 

17521 
17531 
17541 
1755. 
1756* 
1757, 
1758, 
1759, 
17601 



PROC/TXT 



MICPO-PPOCESSOR EMULATION SUPPORT CODE • HJS -• 
, DOUBLE LOADS AND DOUBLE STORES 



78JUL20 11144 



i76i; 

1762. 



17831 



0aiS58L 



001656L 
001657L 
001660L 
001661L 
001662L 
001663L 
001664L 
001665L 
i0l666L 
001667L 
00167(^L 
001671L 
001672L 
001673L 
0^1674L 
001675L 
001676L 
001677L 

00l7e!0L 



001700L 
001701L 
001702L 
001703L 
0il704L 
i0l705L 
001706L 
001707L 



01101111 
11011001 
11011010 
00110111 
0011000! 
11011001 
00U0001 
11101111 
00110001 
00110001 
11101111 
01010001 

11011UJ 

01010001 
00110111 
00110001 
00110001 
11101111 



00110111 

U001110 

11010100 
11010111 

00110PI01 
00110111 

00110111 

00110111 



11110000 
01000100 
01001001 
00001001 
11000100 
01000110 
11100011 
00000000 
11000010 
11100001 
00000000 
00000010 
01000011 
000091100 
00000001 
11000110 
11100101 



01000111 

llllUU 
00111101 

00001001 
00110110 
00001100 

010001U 
10001111 



* 
DLS 



0LS8C 

OLSONE 

0L8ZR0 
DLSLMP 



♦ 
DLOAO 

t 

i 
• 
t 



DECODE ADDRESS & REG SPEC, OPERATORS 



URE 



(OL HL.HL ENTRY) 



LINK <w T 
IF IMP ZERO 

THEN IMP <. 
OLSMPI 

MAR <• HL 
ELSE IF IMP EVEN 

THEN MAR «- 8C 
ELSE IMP <• IMP p. 1 

IF IMP ZERO cm CASE) 
THEN IMP <m URC 

MAR <«p> HL 
ELSE MAR <m DE 
IF LINK B OLOAD 
THEN OLOAO 
ELSE OSTORE 



BAS LINK 

BRA DLSZRO,T#,IZ 

BRA OLSBC,F»,IO 

STB OIMP 

LOX 0E2MRL 

BRA OLSONE, T0,IZ 

LDX 0E2MRH 

BRR LINK 

LDX XX2MRL*URC 

LDX XX2MRH+URB 

BRR LINK 

LDTI URC 

BRA DLSLMP 

LDTI URE 

LOPT LIMP 

DLDX HL2MR 

BRR LINK 



IMP, IMP»l <m (MAR, MAR*1) 

STB SMR 

MWAIT NOOPjMEMPFl 



LOTP 

STB 



MDR 
IMAR,8MR 



DE,HL - 000 

XX, BC • 062, 114,,. 

DELAY ONE FROM THE OINP BEFORE BRA 
BC.HL f 111 

XX, DE - 113, 115.,', 

XX, 8C • 062, 114.,, 

8C,HL p 111 
DE,HL • 000 
XX, HL • 000, 111, HL,HL 



LOAD REGISTER PAIR FROM MEMORY 



LOPT IMPO,OIMP 



GET THE LSB DATA 



AND MORE OF THE SAME 



PAGE 58 

1764'. 

1705*. 

1766'. 

17671 
1788* 
1769. 
1770, 
17711 
1772. 
17731 



PROC/TXT 



1774; 
1775; 



1776, 
1777* 

1778. 



17791 



0P!171^L 
0e>l7nu 
00171?L. 
0fl7l3L 
001714L 

>»(«1716U 

0<317l7t 



05117171 
001720IL 
0«1721L 
001722L 
0B1723L 
i01724L 

0PH725L 

0PI1726L 

>f01727L 

>0«1730L 



001 10U! 

11010100 

11010U1 
00110001 

00110111 
0101100J 

11001111 



0011 
00U 
0011 
0011 
1101 
1101 

0011 

0011 

0101 
1100 



0001 
0111 
0111 
0001 
0100 

0111 

0111 
0111 
1001 

nil 



OATAPOINT CONFIDENTIAL INFORMATION • SEE PAGE 1 

MICRO-PROCESSOR EMULATION SUPPORT CODE • HJS « 
, DOUBLE LOADS AND DOUBLE STORES 



78JUL20 11:44 



00001001 
00110110 
00001001 
00U0110 

10001111 

llUllll 
HIIUU 



MWAIT ,MEMPFl 
LOPP IMPO,MOR 
8RAX FETCH 



GET THE MS8 



1101UU 

00100001 
00001001 

11011111 
00101100 

00001001 
00001100 
00100001 
llllllU 
UllllU 



* 
08T0RE 

i 



(MAR, HAR*n <- IMP, IMp^l 
LDPP M0W,IMPI,DIMP 



LOTP IMPI 
MWAIT ,MEMPF1 



SAVE REGISTER PAIR IN MEMORY 



OUTPUT L8B AND POINT TO MSB 



STB IMAR 
LOPT MOW 
8RAX FETCHW 



OUTPUT MSB 



OATAPOINT CONFIDENTIAL INFDRHATION * SEE PAGE I 
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PROC/TXT 



HICPO«PRaCESSQR EMULATION SUPPOf?T CODE -^ HJ8 - 
, SYSTEM ROUTINES 



7ejUL20 11144 



17S2: 

1784. 
1785* 
17«6' 
1787. 
1788: 
1789' 
1700, 
I79i: 



17921 
1793; 



1794. 

17951 
17961 

17971 
1798* 

1799. 
1800*. 
18011 
1802, 
1803, 
1804. 
1805' 
1806, 
1807. 
1808' 
1809, 
1810, 
1811, 
18121 

18131 
1814. 

1815* 
1816. 

18171 



001731L 



001731L 
001732L 
001733L 
001734L 
001735L 
001736L 
001737L 
001740L 
001741L 
001742L 
>001743L 
>001744L 

001745L 



0il74SL 

00174«L 

001747L 

001750L 

001751L 

00l75aL 

»001753l 

>001754L 

»0il755L 



0011 
0100 

1101 
0101 

0011 
0101 

00H 

0011 

0011 
0011 
0101 

1100 



0001 
0101 
0010 
0001 

aut 
0001 
0111 
0001 
0111 
0111 
1001 
nil 



00110001 
01000101 
11010010 
01010011 
00110111 
00110111 
01011001 
11001001 
11001U1 



U011100 

00000100 
00000111 
10101011 
11000000 

11101111 
11100000 
11011111 
00000011 
00100001 
1 U U 1 1 1 
1 1 1 1 1 U 1 



11011100 
00000100 
00000111 
00000001 
10001100 
00000100 

1 1 1 U 1 1 1 
UlUlll 
H 1 1 1 1 1 1 



BRLJ 
. 4,55 
. 6.55 

• 



* 

ill 
3,10 

8.55 

10,20 



( 0725 8RL 
CIMp 0721 BRL 

IF USER THEN IVIOLS 

ELSE CSEBRLS) <^ BASW <- IMP 
FETCHW 

TSTIP ,SWUSER,PSWJ 

BRA IVI0LI,FZ 
OLDPI MAR0,SE8RLS 



BASE REGISTER LOAD 

BASE REGISTER LOAD FROM OTHER THAN A»REG 



SAVE BASE REG VALUE AWAY 



LOPP 9ASW,IMPI 



LOAD BASE RES BEFORE WRITEl 



LDPT 
BRAX 



C 



MOW 
FETCHW 



050) EI 



(111 050) 

eino 050) 

f062 050) 

flEV 050) 



E4MP,LS8,MSi 
EJMP,L8B,M8B 

EUR 
EUR 



ENABLE INTERRUPTS 

ENABLE INTERRUPTS AND JUMP TO ADDRESS 
UNSPECIFIED 

ENABLE INTERRUPTS AND RETURN 
UNSPECIFIED 



IF USER THEN IVIOLS 

ELSE MOOW «m P8H <m p$U ,0R, SWINTE 
IF IMP ZERO THEN FETCHI 
ELSE EIROJ 



TSTIP ,SWUSER,PSWI 



BRA 
OOPI 

LDPT 
iRAX 

BRA 



IVIOLliFZ 
PSrtO,ORiSWINTF 

MDOW 
FETCHI, T|i,n 

EIROJ 



NOT ALLOWED IN USER MODE 



SET THE INTERRUPTS ON BIT 

IN EMULATION SUPPORT ALSO 
WAS SIMPLE EI 

WAS EJMP OR EUR 



DATAPOINT CONFIDENTIAL INFORMATION * SEE PAGE I 
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PROC/TXT 



MTCRO-PPOCeSSOR EMULATION SUPPORT CODE - HJS 
, SVSTEM ROUTINES 



78JUL20 UM4 



teiel 

1880, 
1821. 
1822' 
1823. 
1824* 
1825. 
1826*. 



1827. 
1828'. 



1829 
1830. 



1831, 
1832. 

1833*. 
1834'. 



1835, 
1 836 . 



18371 
1838, 
1839, 
1840. 



0!«1756L 



001758L 
0K1757L 
0il760L 
001761U 
001762L 
001763L 
>0il764L 
>001765L 



00110001 

01000101 
11010010 
01010101 

00110111 

00110111 
01011001 
11001111 



>001766L 01011001 
>0«1767L 11001111 



1131U00 

00000100 
00000111 

1 1 1 1 U 1 

10001100 
00000100 
llUUll 
1 I 11 U I 1 

1 I 1 1 111 1 

UlllUl 



001770L 01ill001 Hllllll 
001771L 11001111 00110000 



001772L 
001773L 
001774L 
001775L 
001776L 
0«1777L 
002000 

000000 

008000 
000000 



I U U 1 1 1 

1 1 1 1 1 1 1 1 

lIllllU 

1 1 1 1 11 1 1 
1 1 1 1 1 1 1 1 
1 1 1 1 1 1 1 1 



1 U 1 1 U 1 
1 1 1 1 11 II 

iiiinu 
1 1 u u u 

U 1 1 1 1 1 1 
Hllllll 



3,10 ( 



140) 01 



DISABLE INTERRUPTS IF ALLOWED 



IF USER THEN IVIOLS 

ELSE MOOW <m PSW «» P8W ,AND, (»1-SWINTE) 
FETCHI 



TSTIP ,SWUSER,PSWI 

BRA IVIOLlpFZ 

DOPI PSW0,ND,-1-SWINTE 

LOPT MOOW 

8RAX FETCHI 



NOT ALLOi^EO IN USER MOOE 

RESET THE BIT, DISABLING INTERRUPTS 
IN EMULATION SUPPORT ALSO 



MEMPFl BRAX MEMPFS 



IVIOLl BRAX IVIOLS 



TABPAGE PROCL 



PROCLEN EQU 
USE 
SKIP 
END 



S-PRDCP 

PROCL 

PROCLEN 

POR 



PASE <^1 



PROC/TXT 



OATAPOINT CONFIDENTIAL INFORMATIOM - SEE PAGE 1 
MICRO-PPOCESSQR EMULATION SUPPORT CODE • HJS - 



78JUL20 UI44 



AC 



0l0?tl7 


ACCTL 


mimiB 


ACD 


010PI17 


ACPH 


0100H 


ACPL 




ACUOT 


£900417 


ALPHA 


i00534 


ALPHAL 


000413 


ALPHAS 


000001 


APF 


010014 


APFRK 


010013 


APFRP 


010016 


APFTK 


01001S 


APFTP 




86 




BASW 


001126 


BCP 


000400 


BETA 


000471 


8ETAL 


000439 


BETAS 


001226 


BFAC 


001870 


BFADO 


001831 


BFOP 


001300 


BF3 


001228 


BFSB 


001326 


8F8L 


001274 


BFSUB 


000302 


8P 


020006 


BR 


001731 


BRL 


001000 


BT 


001032 


8TCVT 


001103 


BTENO 


001051 


BTR 


001021 


BTX 




C0 




CI 


000100 


CAP55I0 


000315 


CAPABILI 


000010 


CAPAPF 


000004 


CAPBLUE 


000200 


CAPCOM 


000000 


CAPCYNT 


000000 


CAPGUPy 


000001 


CAPMICR 


000000 


CAPRIM 




CC 



001402 CCS 



107 
1248 

♦ 77fA 
*74IA 
*76IA 
#75IA 

91 
*S91 

• 733 

• S77 

♦ 9 1 A 

*aef A 

*67IA 

*70IA 

♦ 69 ^A 
123IA 

81 
♦1081 

• S46 

• 668 

• 622 

♦ 1210 

♦ 12S4 

♦ 1223 

♦ 1265 

♦ 1197 

♦ 1302 

♦ 1258 

• 395 

♦ 42M 

♦ 1783 

• 960 

♦ 1015 

♦ 1035 

♦ 1083 

♦ 1012 

879 
1658 

118. 
•123IA 
*126tA 
*l80iA 
•li9IA 
•184IA 
•18liA 
♦118IA 
♦117IA 
♦182IA 

98 
1239 
1355 

♦ 1362 



763 

1254 

88 



616 
588 
120tA 



1794 



571 
589 

1221 
1146 



1287 
1208 



1010 
1021 

998 
882 

329 
126(A 

126tA 
126; A 

ise'iA 

126IA 
126iA 
126tA 
126IA 

330 
1244 



879 
1299 



882 

1305 



898 
1307 



ii04 

1381 



1018 
1337 



1029 
1357 



1035 

1500 



1153 
1503 



1198 
1642 



1159 
1644 



617 



84 



665 
87 



572 



1148 



730 



1208 



1018 
1013 



1029 
1080 



1035 
1102 



1299 
1106 



1381 
1289 



1337 



1357 



1500 



1554 



1642 



371 
1291 



760 
1892 



868 
1295 



898 
1297 



1001 
1302 



1024 
1333 



1030 
1334 



1040 
1350 



1107 
1351 



1177 

1353 



OATAPOINT CONFIOENTXAL INFORMATIOM • SEE PAGE 1 
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PROC/TXT 




MICRO* 


PROCESSOR 


EMULATIO 


N SUPPORT CODE 


- HJS - 


78JUL20 ir«44 




007«»0« 


COOP 


*134iA 
























0060100 


CDOX 


♦ 1331 A 


























CP 


82 


83 


88 


92 


94 


97 


114 


US 


38i 


420 


433 


434 






484 


506 


642 


644 


792 


795 


805 


807 


808 


866 


872 


877 






881 


863 


888 


898 


911 


915 


1015 


1019 


ia26 


1104 


1144 


1151 






1158 


1161 


1207 


1220 


1242 


1249 


1254 


1258 


1298 


1320 


1336 


1356 






1499 


1553 


1621 


1625 


1632 


1642 


1644 


1649 


1658 


1660 


1665 


1695 






1736 


























CMPF 


77 


























COOMIN 


330 


























cnoMouT 


371 


























COOWRT 


363 
























030011 


cnMHor>E 


♦ 96IA 


92 
























DE2MRH 


1000 


1017 


1028 


1101 


1245 


1742 
















DF2MRL 


1000 


1017 


1028 


1101 


1245 


1740 














001624 


DFCIT 


♦ 1655 


1579 






















801517 


DECP 


♦ 1528 
























001512 


DECPA 


♦ 1508 
























001515 


OECPAS 


♦ 1525 


1523 






















001526 


OECPIT 


♦ 1553 


1526 


1550 




















001522 


OECPS 


♦ 1549 


1547 






















001541 


DEC* 


♦ 1563 
























001177 


DFAOO 


♦ 1157 


1145 






















001205 


OFAEND 


♦ 1162 


1160 






















001162 


DFOP 


♦ 1116 


1100 






















001174 


OFSEND 


♦ 1154 


1152 






















001170 


DFSU8 


♦ 1150 


1147 






















001756 


DI 


♦ 1819 


























OIMP 


648 

1763 


797 
1773 


830 


945 


949 


1498 


1502 


1552 


1556 


1631 


1663 


1739 


001655 


OL 


♦ 1699 
























001651 


DLHL 


♦ 1688 
























001700 


OLOAO 


♦ 1754 


1695 


1715 




















001656 


OLS 


♦ 1717 


1686 






















001666 


OLSBC 


♦ 1744 


1738 






















001674 


DLSLMP 


♦ 1750 


1697 


1748 




















001671 


DLSONF 


♦ 1747 


1741 






















001673 


DLSZPO 


♦ 1749 


1737 
























DMAP 


115 


491 


521 


651 


717 


722 


764 


600 


804 


833 


1651 




001647 


OS 


♦ 1671 
























001717 


OSTORE 


♦ 1768 


1688 






















001745 


EI 
EIROJ 


♦ 1798 
1817 
























000104 


EXADR 


♦ 182 
























000134 


EXOATA 


♦ 216 
























000123 


EXSTAT 
FETCH 


*20l 
1411 


1666 


1766 






















FETCH! 


955 


1323 


1338 


1358 


1369 


1501 


1506 


1555 


1558 


1816 


1830 






FfTCHW 


156 


812 


836 


1192 


1450 


1653 


1778 


1796 










000054 


FETPC 


♦ 193 


538 






















001436 


FETPL 


♦ 1411 


1407 






















001461 


FETPS 


♦ 1450 


1445 























PAGF 63 



PROC/TXT 



OATAPOINT CONFIOENTIAL INFORMATION • SEE PAGE I 
MICRO»PROCESSO» EMULATION SUPPORT CODE - HJS • 



78JUL20 11144 



000631 
00077S 



001577 
00147PI 
001463 
001466 
001477 

001473 
001543 
001565 
001544 
001640 
001613 
000061 
000064 
000067 
020005 



000317 

001770 

020004 



010001 



030000 



010003 



FLEX 

FTCHABW 

FTCHIA8 

FTCHIO 

HL8MRH 

HL2MRL 

I35I 

1350 

lOCOOH 

IDCODl, 

IIMP 

IMAR 

IMP8 

IMPFO 

IMPI 

IMRO 

INBUS 

INCIT 

IWCP 

IfMCPA 

INCPAS 

INCPIT 

INCPS 

INCX 

INDGET 

INOX 

INOXt 

INOXS 

INPUT 

INPUTX 

INPWl 

10 

IT 

ITifd 

IVIOLS 

IVIOLI 

n 



K8SC 

KSSCNT 

LIMP 

LINK 

LIRE6 

LUCF 

LUF 

MAOR 

MARIH 

MARIL 



♦132IA 

*812 

*954 

♦ 156 
322 

1444 

1406 
1075 

397 
1664 

117 
1624 

647 
1500 

193 
1500 

153 

153 

♦ 1639 

♦ 1474 

♦ 1455 

♦ 1471 

♦ 1499 

♦ 1495 

♦ 1581 

♦ 1632 

♦ 1599 

♦ 1663 

♦ 1647 

♦ 135 

♦ 153 

♦ 154 

♦ 41 SA 
1J6 

1035 

♦ 449 
1834 

♦ 1834 

♦ 401 A 
998 

1741 
95 

♦ 49IA 
525 

♦ 82«A 
363 

J JC «F Jr 

765 

♦ 54tA 
329 
329 



656 
575 
274 
356 

356 



1075 

369 
1630 

788 
1503 

198 
1503 

834 

328 
1597 



1469 
1472 
1493 

1627 
1379 
1645 
1661 

177 

155 
572 
329 

152 

1792 

486 
1100 
1816 

94 

647 

1239 

380 

1308 

1109 

97 

805 

805 



620 

828 
828 



421 

1641 
829 

1554 
210 

1554 

1322 



1496 



617 
884 

175 

1813 
574 

1287 



714 
1252 

1321 
1151 

1013 
1013 



874 

895 

1012 



791 
1657 

1557 

225 

1557 

1335 



999 

1007 

195 

1827 

618 

1407 



788 
1621 

1337 
1159 

1020 

1020 



1012 

1023 



796 
1762 

1664 

262 

1773 

1354 



1146 

1013 

212 



653 
1445 



829 
1637 

1357 
1255 

1025 
1025 



1023 
1105 



810 
1776 



649 
1774 

1368 



1496 

1020 

227 



786 
1469 



1470 
1695 



1259 

1031 
1031 



1105 
J240 



1550 
1102 

264 



802 
1493 



1494 
1736 



1648 

1102 
1102 



1240 
1286 



1627 

1106 

320 



835 
1523 



1624 
1743 



1286 
1751 



1751 



896 1400 1408 1439 1448 



798 878 1320 1332 1352 
1794 
1410 1665 1763 1765 



1738 
1289 

358 



876 
1547 



1548 
1746 



1620 



14 46 



1322 
569 



944 
1645 



1758 
1752 



614 



948 
1661 



862 



951 
1737 



1106 
1106 



1241 
1241 



1246 
1246 



1289 
1289 



1303 
1303 



OATAPOJNT CONFIRENTIAL INFORMATION * SEE PAGE I 



PASe 64 


PROC/TXT 






MICRO* 


PROCESSOR 


EMULATION SUPPORT CODE 


» Has w 


78JUL20 11144 






MAROH 


106 


112 


197 


517 


794 


884 


891 


912 


1007 


1793 








MARDL 


113 


197 


644 


680 


745 


795 


882 


1004 


1403 


1442 


1635 


1793 


010904 


HBITS 


♦ 55IA 


83 






















0101?I0S 


MBSTAT 


*56tA 


82 






















010006 


MCRCH 


♦57:a 
























010007 


MCRCU 


*58fA 


























MOR 


362 


724 


763 


790 


794 


832 


893 


1004 


1018 


1029 


1184 


1109 






1244 


1251 


1294 


1307 


1403 


1406 


1410 


1442 


1623 


1629 


1635 


1640 






1644 


1956 


1660 


1761 


1765 
















010010 


MOSKS 


♦ 59IA 
























0100U 


MDSKT 


*60tA 


























MOW 


117 


198 


328 


523 


646 


652 


801 


807 


811 


1018 


1029 


1154 






1162 


1254 


1258 


1296 


1307 


1444 


1449 


1647 


1652 


1773 


1777 


1795 




HEMPFS 


540 


1832 






















000369 


MEMPF0 


*540 
809 


361 
831 


385 


482 


650 


664 


723 


761 


789 


793 


799 


803 


001766 


HEMPPl 


*1832 


1003 


1016 


1027 


1074 


1103 


1108 


1243 


1250 


1293 


1306 


1402 






1405 


1409 


1441 


1447 


1622 


1628 


1634 


1639 


1643 


1650 


1655 


1659 






1760 


1764 


1775 




















000361 


MEMPF8C 


*529 
























000S00 


MIN 


*292 
























00026? 


MINOUT 


*372 


331 






















00017S 


MINOWT 


♦ 278 


379 






















000102 


MINPAR 


♦ 178 


327 






















000210 


MINW0 


♦ 324 


325 






















000262 


MINWl 


♦ 373 


374 






















020002 


MO 


♦ 38tA 


76 


120 


361 


385 


482 


526 


650 


664 


723 


761 


789 






793 


799 


603 


809 


831 


890 


909 


1003 


1016 


1027 


1074 


1103 






1108 


1243 


1250 


1293 


1306 


1402 


1405 


1409 


1441 


1447 


1622 


1628 






1634 


1639 


1643 


1650 


1655 


1659 


1760 


1764 


1775 








000S44 


MOOLOO 


♦ 750 


684 






















000636 


MOOLOP 


♦ 829 


766 






















000433 


M008AV 


♦ 625 


578 






















000503 


MOOSRV 


♦ 686 


662 






















000446 


MOOSVLP 


♦ 648 


653 
























MOOW 


80 


289 


321 


359 


522 


657 


724 


762 


892 


894 


1815 


1829 


000170 


MOTPAR 


♦ 275 


367 






















000247 


MOTW0 


♦ 364 


365 






















000230 


MOUT 


♦ 333 
























§20003 


MP 


♦ 39IA 


361 


385 


482 


527 


650 


664 


723 


761 


789 


793 


799 






803 


809 


831 


890 


909 


1003 


1016 


1027 


1074 


1103 


1108 


1243 






1250 


1293 


1306 


1402 


1405 


1409 


1441 


1447 


1622 


1628 


1634 


1639 






1643 


1650 


1655 


1659 


1760 


1764 


1775 














MR2HLH 


370 


897 
























MR2HLL 


370 


























MR2PCH 


497 


718 


1401 


1440 


1633 


















MR2PCL 


497 


718 


1401 


1440 


1633 
















010013 


MSECT 


♦ 62iA 
























010012 


MTRAK 
OTBUS 


♦ 61IA 
193 


210 


225 


262 


362 
















000145 


OUTPUT 


♦ 231 
























000153 


OUTW0 


♦ 265 


199 


214 


229 


266 
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PROC/TXT 




MICRO* 


PROCESSOR 


EMULATION SUPPORT CODE 


• HJS • 


7ejUL20 ) 


11144 




010157 


OUTWl 


♦ 268 


269 


290 




















000163 


0UTW2 

PC2MRH 

PC2MRL 

PCL 
PCMOD 
PCOH 
PCDL 


♦ 271 
491 
491 
525 
527 
125 
99 


272 
717 
717 
714 

123 






















010000 


POLNP 


♦ 48}A 


98 






















000074 


PIN 


♦ 159 
























001407 


PLR 
POPST0 


♦ 1374 
715 
























000000 


POR 


♦ 70 


1840 






















000031 


PORLST 


♦ 106 


108 






















000055 


POROUT 


♦ 125 


101 






















000045 


P0R7RQ 


♦ 117 


121 






















000040 


PRE 


♦ 31A 
























000000 


PROC 


♦130iA 


62 






















000000 


PROCL 


♦ 64 


66 


542 


956 


1836 
















002000 


PROCLGN 


♦ 1837 


1839 






















000000 


PROCP 


♦ 66 


1837 






















002000 


PROD 
PSHST0 


♦131IA 
527 
























001440 


PSR 


♦ 1413 


























PSWI 


151 


174 


194 


211 


226 


263 


288 


319 


357 


446 


522 


523 






568 


613 


654 


663 


682 


747 


861 


894 


947 


1191 


1791 


1812 






1826 


























PSWO 


79 
1828 


196 


213 


228 


288 


524 


576 


621 


72A 


759 


1191 


1814 


010002 


Q 


♦ 46IA 


329 


760 


868 


1001 


1013 


1020 


1024 


1040 


1102 


1106 


1177 






1289 


1291 


1292 


1295 


1297 


1302 


1333 


1334 


1350 


1351 


1353 


1355 


030006 


RCRCH 


♦93IA 
























030007 


RCRCL 


♦ Q4tA 
























030005 


RDATA 


♦ 92tA 
























000633 


RFGL 


♦ 815 


786 






















000640 


REGLLP 


♦ 830 


835 






















000557 


REGS 


♦ 770 
























000602 


REGSLP 
RETS 


♦ 7§7 

130 


802 






















000011 


REV 


♦ 2IA 
























001207 


RIN16 


♦ 1168 


U55 


1256 


1260 


1300 


1309 














001110 


RIN256 


♦ 1044 


1036 


1110 




















001215 


RIND 


♦ 1182 


914 


916 


1037 


1057 


1111 














001120 


RINRO 


♦ 1074 


1059 






















001124 


RINRPT 


♦ 1077 


1073 






















000274 


RINSIO 


♦ 382 
























001U6 


RINST 


♦ 1062 


1180 






















030004 


RPNTR 


♦SUA 
























030003 


R8TAT 


♦ 90»A 


























SB 


377 

1557 


1025 
1658 


1031 
1660 


1056 


1109 


1151 


1178 


1241 


1246 


1258 


1303 


1554 


000304 


SC 


♦ 404 
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PROC/TXT 




HICRO" 


PROCESSOR 


EMULATION SUPPORT CODE 


• HJS • 


78JUL20 1U44 




010008 


SCANSV 


♦ 50iA 


















000305 


SC8P 


*413 


402 
















000326 


SCOECP 


*489 


















00033S 


SCDON 


♦ 508 


435 
















000325 


SCLST 


*486 


















000324 


SCLSTI 


*484 


















00032S 


SCUSTW 


♦ 469 


179 


276 


454 












000331 


SCPC 


♦493 


422 
















000333 


SCRAM 


♦ 499 


486 
















000311 


SCROM 


♦ 434 


















000310 


SCROML 

SOLCMD 

SE9RUS 

SEDieOT 

SESAVAF 

SE8AV8F 

8EXADR 

SINS 


♦ 424 

90 

1793 

98 

577 

622 

197 

153 


745 

680 

328 


















SIOO 


193 


210 


225 


262 


270 287 


323 


362 








SL 


868 


1291 


1350 














001346 


SLC 


♦ 1313 




















SMR 


356 


681 


722 


746 


764 787 


791 


828 


833 885 896 


1000 






1008 


1012 


1023 


1101 


1105 1240 


1245 


1286 


1400 1404 1408 


1439 






1620 


1624 


1630 


1636 


1641 1657 


1759 


1762 








SNID 


950 




















SOTS 


267 


368 


















SP2HRH 


521 


645 


681 


719 


746 787 


806 










SP2MRL 


520 


721 


787 


806 














SPIL 


643 


679 


744 
















SR 


1295 


1297 


1334 


1353 


1355 










001355 


SRC 


♦ 1325 


















001366 


SRE 

8RSYSMF 

SRTMOUT 

SRVOO 

8RVRE(5 

SRVRPT 

STAG 


♦ 1340 
537 
99 
686 
386 
389 
105 


661 
917 


905 
1077 


1072 












/ 


STATUS 


154 


176 


265 


268 


271 324 


364 


373 






). 


STEK 


100 




















STIOOR 


154 


265 


268 


271 


324 364 


373 








, 000652 


STU 


♦ 841 


















^ 00071? 


STLAGN 


♦ 888 


906 
















000742 


STLDONE 


♦ 909 


890 


904 














^ 000670 


8TLTM0UT 


100 


















STUNRPT 


♦ 872 


864 
















000713 


STLOOP 


♦ 890 


900 
















, 000674 
^ 000701 


STURPTO 


♦ 876 


870 
















STLZRO 


♦881 


876 


















STPFIN 


176 


326 
















( 


STPFOU 


273 


366 
















STW 


106 


110 


518 


693 


913 











( 

( 
( 
( 
( 
( 
( 
( 
( 
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STWF 


105 


























SVBKPNT 


401 


























SVINP 


178 


























SVIVIOL 


453 


























SVOUTP 


275 


























SVSCAL 


410 


























SVUAIN8 


407 


























SWALBT 


573 


619 


663 


682 


729 


747 
















SWBASO 


892 


























SWINTE 


321 


359 


657 


1814 


1626 


















SWRPT 


288 


570 


576 


615 


621 


654 


683 


747 


863 


1191 








SWSCF 


522 


524 
























SWSTOT 


196 


213 


228 






















SMUSER 


151 
1791 


174 

1812 


194 
1826 


211 


226 


263 


319 


357 


446 


568 


613 


861 




SYSeSR 


112 


113 
























SYSIVR 


506 
























000505 


SYSRET 

SYSRET0 


• 688 
715 


618 






















000512 


SYSRETl 
SYSROM 


♦ 717 

110 


125 


434 


517 


912 
















000415 


SYSSAV 


♦ 580 


574 
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SYSTAT 


• 923 
























000771 


SYSTND 


♦ 953 


948 


951 
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TEMPI 


♦ 8314 


85*1 A 


330 


371 


380 


877 


879 


881 


888 


898 


915 


1015 






1018 


1019 


1026 


1029 


1030 


1035 


1104 


1107 


1151 


1158 


1161 


1244 






1254 


1258 


1298 


1299 


1320 


1321 


1336 


1337 


1356 


1357 


1499 


1500 






1553 


1554 






















030002 


TeMP2 


♦ 84iA 
1242 


86IA 
1249 


642 


644 


866 


872 


882 


883 


911 


1144 


1207 


1220 


030001 


TEMPH 


•estA 


434 


506 


80S 


808 


1632 


1644 


1660 










030002 


TEMPU 


♦ S63A 
1649 


114 

1658 


118 
1665 


420 


433 


484 


792 


795 


805 


807 


1625 


1642 
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♦ 5>A 


121 A 


117IA 


119tA 


1241 A 
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646 


1248 


1290 


1305 


1349 


1368 
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1020 


1031 


1102 


1246 
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1020 


1031 


1102 


1246 
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UDOP 


♦ 456 


447 


944 
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URB 


♦ 437 

1005 

953 


1014 
1035 


1026 
1154 


1471 

1162 


1525 
1745 
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866 


873 


946 


1056 


1178 


1744 


1747 
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1749 


























UREO 


377 
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329 


883 


686 


911 


1006 
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1025 


1106 


1241 


1269 
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866 
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1026 


1035 
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329 
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1241 
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